home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
You can browse this item here: d_turtle
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
| 100%
| file
| RISC OS archive (ArcFS format)
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Acorn ArcFS Archive
| default
| |
| 100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
| 100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 54 06 00 00 b4 06 00 00 |Archive.|T.......|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 44 5f 54 75 72 74 | 6c 65 00 00 ff ff ff ff |.!D_Turt|le......|
|00000070| 46 fd ff ff b9 85 20 95 | 00 00 00 00 ff ff ff ff |F..... .|........|
|00000080| 30 06 00 80 82 21 52 75 | 6e 00 00 00 00 00 00 00 |0....!Ru|n.......|
|00000090| bc 01 00 00 46 eb ff ff | 4e 29 11 74 03 00 97 bd |....F...|N).t....|
|000000a0| bc 01 00 00 24 00 00 00 | 82 21 52 55 4e 49 4d 41 |....$...|.!RUNIMA|
|000000b0| 47 45 00 00 82 1c 01 00 | 46 f8 ff ff 3a fe 15 74 |GE......|F...:..t|
|000000c0| 03 00 a1 30 82 1c 01 00 | 04 02 00 00 82 21 53 70 |...0....|.....!Sp|
|000000d0| 72 69 74 65 73 00 00 00 | e0 02 00 00 46 f9 ff ff |rites...|....F...|
|000000e0| 28 04 11 74 03 00 1a 26 | e0 02 00 00 aa 1e 01 00 |(..t...&|........|
|000000f0| 82 21 53 70 72 69 74 65 | 73 32 32 00 88 05 00 00 |.!Sprite|s22.....|
|00000100| 46 f9 ff ff 41 01 11 74 | 03 00 b2 8e 88 05 00 00 |F...A..t|........|
|00000110| ae 21 01 00 82 48 65 6c | 70 00 00 00 00 00 00 00 |.!...Hel|p.......|
|00000120| 2a 17 00 00 45 ff ff ff | f3 22 48 af 03 00 3e b2 |*...E...|."H...>.|
|00000130| 2a 17 00 00 5a 27 01 00 | 82 48 65 6c 70 32 00 00 |*...Z'..|.Help2..|
|00000140| 00 00 00 00 b7 03 00 00 | 45 ff ff ff 62 90 6e e7 |........|E...b.n.|
|00000150| 03 00 89 ef b7 03 00 00 | a8 3e 01 00 82 49 63 6f |........|.>...Ico|
|00000160| 6e 73 00 00 00 00 00 00 | 94 44 00 00 46 f9 ff ff |ns......|.D..F...|
|00000170| 21 ff 10 74 03 00 b5 5c | 94 44 00 00 83 42 01 00 |!..t...\|.D...B..|
|00000180| 82 4d 65 73 73 61 67 65 | 73 00 00 00 f7 06 00 00 |.Message|s.......|
|00000190| 45 ff ff ff 0d ad 47 ad | 03 00 f6 3a f7 06 00 00 |E.....G.|...:....|
|000001a0| 3b 87 01 00 82 52 65 61 | 64 4d 65 00 00 00 00 00 |;....Rea|dMe.....|
|000001b0| 7b 27 00 00 46 ff ff ff | 3a 56 84 72 03 00 6b 16 |{'..F...|:V.r..k.|
|000001c0| 7b 27 00 00 56 8e 01 00 | 82 53 6f 75 6e 64 73 00 |{'..V...|.Sounds.|
|000001d0| 00 00 00 00 ff ff ff ff | 46 fd ff ff 18 88 20 95 |........|F..... .|
|000001e0| 00 00 00 00 ff ff ff ff | 40 02 00 80 82 47 6c 61 |........|@....Gla|
|000001f0| 73 73 31 00 00 00 00 00 | d8 40 00 00 42 fa ff ff |ss1.....|.@..B...|
|00000200| 26 6f 04 8b 03 00 9e 93 | d8 40 00 00 f5 b5 01 00 |&o......|.@......|
|00000210| 82 47 6c 61 73 73 32 00 | 00 00 00 00 d8 c1 00 00 |.Glass2.|........|
|00000220| 42 fa ff ff 29 6f 04 8b | 03 00 5c 65 d8 c1 00 00 |B...)o..|..\e....|
|00000230| f1 f6 01 00 82 53 6f 75 | 6e 64 00 00 00 00 00 00 |.....Sou|nd......|
|00000240| d0 58 00 00 42 fa ff ff | 1c 6f 04 8b 03 00 a2 19 |.X..B...|.o......|
|00000250| d0 58 00 00 ed b8 02 00 | 82 53 70 6c 61 73 68 00 |.X......|.Splash.|
|00000260| 00 00 00 00 1a 52 00 00 | 42 fa ff ff 47 6f 04 8b |.....R..|B...Go..|
|00000270| 03 00 9f f7 1a 52 00 00 | e1 11 03 00 00 00 00 00 |.....R..|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 40 02 00 00 |........|....@...|
|000002a0| 82 53 70 72 69 74 65 73 | 00 00 00 00 ff ff ff ff |.Sprites|........|
|000002b0| 46 fd ff ff 6a 8a 20 95 | 00 00 00 00 ff ff ff ff |F...j. .|........|
|000002c0| e8 05 00 80 82 43 41 54 | 00 00 00 00 00 00 00 00 |.....CAT|........|
|000002d0| 48 0b 00 00 45 f9 ff ff | e7 bc d5 87 03 00 4c 5e |H...E...|......L^|
|000002e0| 48 0b 00 00 1f 64 03 00 | 82 43 48 49 43 4b 00 00 |H....d..|.CHICK..|
|000002f0| 00 00 00 00 f8 05 00 00 | 45 f9 ff ff f1 cc d5 87 |........|E.......|
|00000300| 03 00 f5 6b f8 05 00 00 | 8b 6f 03 00 82 63 6c 6f |...k....|.o...clo|
|00000310| 75 64 00 00 00 00 00 00 | 28 05 00 00 45 f9 ff ff |ud......|(...E...|
|00000320| 3c 3d 31 73 03 00 51 34 | 28 05 00 00 a7 75 03 00 |<=1s..Q4|(....u..|
|00000330| 82 64 61 66 66 6f 64 69 | 6c 00 00 00 78 0b 00 00 |.daffodi|l...x...|
|00000340| 44 f9 ff ff 29 8a 94 6e | 03 00 f0 b5 78 0b 00 00 |D...)..n|....x...|
|00000350| f3 7a 03 00 82 44 65 66 | 61 75 6c 74 00 00 00 00 |.z...Def|ault....|
|00000360| e0 02 00 00 44 f9 ff ff | c9 43 82 6a 03 00 43 ed |....D...|.C.j..C.|
|00000370| e0 02 00 00 8f 86 03 00 | 82 44 52 41 47 4f 4e 00 |........|.DRAGON.|
|00000380| 00 00 00 00 18 0a 00 00 | 45 f9 ff ff 27 d8 d5 87 |........|E...'...|
|00000390| 03 00 c5 49 18 0a 00 00 | 93 89 03 00 82 46 49 53 |...I....|.....FIS|
|000003a0| 48 00 00 00 00 00 00 00 | 88 09 00 00 45 f9 ff ff |H.......|....E...|
|000003b0| 2d aa d5 87 03 00 f8 d2 | 88 09 00 00 cf 93 03 00 |-.......|........|
|000003c0| 82 46 4f 4f 54 42 41 4c | 4c 00 00 00 48 0b 00 00 |.FOOTBAL|L...H...|
|000003d0| 45 f9 ff ff 0b c2 d5 87 | 03 00 18 4d 48 0b 00 00 |E.......|...MH...|
|000003e0| 7b 9d 03 00 82 4c 41 4d | 50 00 00 00 00 00 00 00 |{....LAM|P.......|
|000003f0| d8 07 00 00 45 f9 ff ff | b5 b0 d5 87 03 00 a4 51 |....E...|.......Q|
|00000400| d8 07 00 00 e7 a8 03 00 | 82 6d 6f 75 6e 74 00 00 |........|.mount..|
|00000410| 00 00 00 00 68 13 00 00 | 44 f9 ff ff 01 4b da f1 |....h...|D....K..|
|00000420| 03 00 ea 91 68 13 00 00 | e3 b0 03 00 82 4d 4f 55 |....h...|.....MOU|
|00000430| 53 45 00 00 00 00 00 00 | f8 07 00 00 45 f9 ff ff |SE......|....E...|
|00000440| 0f a0 d5 87 03 00 ac 42 | f8 07 00 00 6f c4 03 00 |.......B|....o...|
|00000450| 82 70 61 6c 6d 00 00 00 | 00 00 00 00 58 0a 00 00 |.palm...|....X...|
|00000460| 44 f9 ff ff 77 0a 59 f2 | 03 00 1a f3 58 0a 00 00 |D...w.Y.|....X...|
|00000470| 8b cc 03 00 82 52 41 42 | 42 49 54 00 00 00 00 00 |.....RAB|BIT.....|
|00000480| b8 0f 00 00 45 f9 ff ff | 2e c7 d5 87 03 00 3c 3b |....E...|......<;|
|00000490| b8 0f 00 00 07 d7 03 00 | 82 53 48 49 50 00 00 00 |........|.SHIP...|
|000004a0| 00 00 00 00 50 08 00 00 | 45 f9 ff ff 0c b8 d5 87 |....P...|E.......|
|000004b0| 03 00 64 9c 50 08 00 00 | e3 e6 03 00 82 53 4b 55 |..d.P...|.....SKU|
|000004c0| 4c 4c 00 00 00 00 00 00 | f8 08 00 00 45 f9 ff ff |LL......|....E...|
|000004d0| bf d2 d5 87 03 00 25 e4 | f8 08 00 00 57 ef 03 00 |......%.|....W...|
|000004e0| 82 74 72 65 65 00 00 00 | 00 00 00 00 d0 0f 00 00 |.tree...|........|
|000004f0| 44 f9 ff ff 3d 00 16 fc | 03 00 d9 82 d0 0f 00 00 |D...=...|........|
|00000500| 73 f8 03 00 82 74 75 6c | 69 70 00 00 00 00 00 00 |s....tul|ip......|
|00000510| 58 08 00 00 44 f9 ff ff | 22 f6 cb ee 03 00 e6 8d |X...D...|".......|
|00000520| 58 08 00 00 67 08 04 00 | 82 74 75 72 74 6c 65 00 |X...g...|.turtle.|
|00000530| 00 00 00 00 e0 02 00 00 | 43 f9 ff ff 27 bb 5a 47 |........|C...'.ZG|
|00000540| 03 00 6c dc e0 02 00 00 | e3 10 04 00 82 57 68 61 |..l.....|.....Wha|
|00000550| 69 6c 00 00 00 00 00 00 | c8 08 00 00 43 f9 ff ff |il......|....C...|
|00000560| 0c a4 1f a4 03 00 ce f9 | c8 08 00 00 e7 13 04 00 |........|........|
|00000570| 82 57 72 61 69 6e 00 00 | 00 00 00 00 c8 08 00 00 |.Wrain..|........|
|00000580| 43 f9 ff ff b8 9d 1f a4 | 03 00 db c9 c8 08 00 00 |C.......|........|
|00000590| d3 1c 04 00 82 57 73 68 | 6f 77 65 72 73 00 00 00 |.....Wsh|owers...|
|000005a0| 78 0b 00 00 43 f9 ff ff | 4d a7 1f a4 03 00 95 79 |x...C...|M......y|
|000005b0| 78 0b 00 00 bf 25 04 00 | 82 57 73 6e 6f 77 00 00 |x....%..|.Wsnow..|
|000005c0| 00 00 00 00 c8 08 00 00 | 43 f9 ff ff bc ab 1f a4 |........|C.......|
|000005d0| 03 00 f4 f7 c8 08 00 00 | 5b 31 04 00 82 57 73 75 |........|[1...Wsu|
|000005e0| 6e 00 00 00 00 00 00 00 | c8 08 00 00 43 f9 ff ff |n.......|....C...|
|000005f0| 2c a9 1f a4 03 00 08 02 | c8 08 00 00 47 3a 04 00 |,.......|....G:..|
|00000600| 82 57 74 68 75 6e 64 65 | 72 00 00 00 c8 08 00 00 |.Wthunde|r.......|
|00000610| 43 f9 ff ff c4 a0 1f a4 | 03 00 d9 1f c8 08 00 00 |C.......|........|
|00000620| 33 43 04 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |3C......|........|
|00000630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 40 02 00 00 | 82 54 65 6d 70 6c 61 74 |....@...|.Templat|
|00000650| 65 73 00 00 65 24 00 00 | 46 ec ff ff 3c b1 10 74 |es..e$..|F...<..t|
|00000660| 03 00 ed a7 65 24 00 00 | 1f 4c 04 00 00 00 00 00 |....e$..|.L......|
|00000670| 03 00 00 00 00 00 00 00 | 05 00 00 00 a2 00 00 00 |........|........|
|00000680| d4 ff ff ff ba 00 00 00 | 00 00 00 00 26 ff 4e 07 |........|....&.N.|
|00000690| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006b0| 40 02 00 00 46 69 6c 65 | 44 61 74 61 82 21 52 75 |@...File|Data.!Ru|
|000006c0| 6e 00 00 00 00 00 00 00 | bc 01 00 00 46 eb ff ff |n.......|....F...|
|000006d0| 4e 29 11 74 03 00 97 bd | 53 65 74 20 21 44 5f 54 |N).t....|Set !D_T|
|000006e0| 75 72 74 6c 65 24 44 69 | 72 20 3c 4f 62 65 79 24 |urtle$Di|r <Obey$|
|000006f0| 44 69 72 3e 0a 49 63 6f | 6e 53 70 72 69 74 65 73 |Dir>.Ico|nSprites|
|00000700| 20 3c 4f 62 65 79 24 44 | 69 72 3e 2e 21 53 70 72 | <Obey$D|ir>.!Spr|
|00000710| 69 74 65 73 0a 7c 49 63 | 6f 6e 53 70 72 69 74 65 |ites.|Ic|onSprite|
|00000720| 73 20 3c 4f 62 65 79 24 | 44 69 72 3e 2e 49 63 6f |s <Obey$|Dir>.Ico|
|00000730| 6e 73 0a 57 69 6d 70 53 | 6c 6f 74 20 2d 6d 69 6e |ns.WimpS|lot -min|
|00000740| 20 34 34 38 4b 20 2d 6d | 61 78 20 34 34 38 4b 0a | 448K -m|ax 448K.|
|00000750| 52 4d 45 6e 73 75 72 65 | 20 43 6f 6c 6f 75 72 54 |RMEnsure| ColourT|
|00000760| 72 61 6e 73 20 30 2e 35 | 31 20 52 4d 4c 6f 61 64 |rans 0.5|1 RMLoad|
|00000770| 20 53 79 73 74 65 6d 3a | 4d 6f 64 75 6c 65 73 2e | System:|Modules.|
|00000780| 43 6f 6c 6f 75 72 73 0a | 52 4d 45 6e 73 75 72 65 |Colours.|RMEnsure|
|00000790| 20 43 6f 6c 6f 75 72 54 | 72 61 6e 73 20 30 2e 35 | ColourT|rans 0.5|
|000007a0| 31 20 45 72 72 6f 72 20 | 59 6f 75 20 6e 65 65 64 |1 Error |You need|
|000007b0| 20 43 6f 6c 6f 75 72 54 | 72 61 6e 73 20 30 2e 35 | ColourT|rans 0.5|
|000007c0| 31 20 6f 72 20 6c 61 74 | 65 72 0a 52 4d 45 6e 73 |1 or lat|er.RMEns|
|000007d0| 75 72 65 20 4d 65 73 73 | 61 67 65 54 72 61 6e 73 |ure Mess|ageTrans|
|000007e0| 20 30 2e 30 33 20 52 4d | 4c 6f 61 64 20 53 79 73 | 0.03 RM|Load Sys|
|000007f0| 74 65 6d 3a 4d 6f 64 75 | 6c 65 73 2e 4d 73 67 54 |tem:Modu|les.MsgT|
|00000800| 72 61 6e 73 0a 52 4d 45 | 6e 73 75 72 65 20 4d 65 |rans.RME|nsure Me|
|00000810| 73 73 61 67 65 54 72 61 | 6e 73 20 30 2e 30 33 20 |ssageTra|ns 0.03 |
|00000820| 45 72 72 6f 72 20 50 6c | 65 61 73 65 20 75 70 64 |Error Pl|ease upd|
|00000830| 61 74 65 20 79 6f 75 72 | 20 63 6f 70 79 20 6f 66 |ate your| copy of|
|00000840| 20 21 53 79 73 74 65 6d | 20 74 6f 20 6f 6e 65 20 | !System| to one |
|00000850| 63 6f 6e 74 61 69 6e 69 | 6e 67 20 4d 73 67 54 72 |containi|ng MsgTr|
|00000860| 61 6e 73 20 30 2e 30 33 | 20 6f 72 20 6c 61 74 65 |ans 0.03| or late|
|00000870| 72 0a 52 75 6e 20 3c 21 | 44 5f 54 75 72 74 6c 65 |r.Run <!|D_Turtle|
|00000880| 24 44 69 72 3e 2e 21 52 | 75 6e 49 6d 61 67 65 20 |$Dir>.!R|unImage |
|00000890| 25 2a 30 0a 46 69 6c 65 | 44 61 74 61 82 21 52 55 |%*0.File|Data.!RU|
|000008a0| 4e 49 4d 41 47 45 00 00 | 82 1c 01 00 47 fd ff ff |NIMAGE..|....G...|
|000008b0| af 0c 4b 1e 03 00 a1 30 | 44 10 9f e5 3c 20 9f e5 |..K....0|D...< ..|
|000008c0| 34 30 9f e5 04 00 12 e4 | 04 00 03 e4 04 10 51 e2 |40......|......Q.|
|000008d0| fb ff ff 5a 00 00 8f e2 | 05 00 00 ef 42 41 53 49 |...Z....|....BASI|
|000008e0| 43 20 2d 51 75 69 74 20 | 40 30 30 30 30 39 30 30 |C -Quit |@0000900|
|000008f0| 30 2c 30 30 30 31 41 43 | 33 34 00 41 34 ac 01 00 |0,0001AC|34.A4...|
|00000900| 84 9c 01 00 34 1c 01 00 | 0d 00 0a 1d 20 f4 20 3e |....4...|.... . >|
|00000910| 24 2e 21 44 5f 54 75 72 | 74 6c 65 2e 21 52 55 4e |$.!D_Tur|tle.!RUN|
|00000920| 49 4d 41 47 45 0d 00 1e | 15 20 c8 99 22 48 6f 75 |IMAGE...|. .."Hou|
|00000930| 72 67 6c 61 73 73 5f 4f | 6e 22 0d 00 28 35 20 f2 |rglass_O|n"..(5 .|
|00000940| 64 65 66 69 6e 65 3a f2 | 66 69 6e 64 5f 64 69 6d |define:.|find_dim|
|00000950| 65 6e 3a f2 64 65 66 69 | 6e 65 32 3a f2 73 65 74 |en:.defi|ne2:.set|
|00000960| 75 70 33 3a f2 73 65 74 | 75 70 5f 68 65 6c 70 0d |up3:.set|up_help.|
|00000970| 00 32 29 20 f2 73 74 61 | 72 74 75 70 5f 6d 65 6d |.2) .sta|rtup_mem|
|00000980| 3a f2 69 6e 69 74 69 61 | 6c 69 73 65 3a f2 67 72 |:.initia|lise:.gr|
|00000990| 61 62 5f 73 65 74 75 70 | 0d 00 3c 24 20 ee 20 85 |ab_setup|..<$ . .|
|000009a0| 20 e7 20 a4 77 69 6d 70 | 65 72 72 6f 72 20 c8 98 | . .wimp|error ..|
|000009b0| 20 8b 20 f2 65 72 72 6f | 72 3a c8 98 0d 00 46 2e | . .erro|r:....F.|
|000009c0| 20 f2 73 70 72 73 28 73 | 70 72 69 74 65 73 5f 70 | .sprs(s|prites_p|
|000009d0| 61 74 68 24 29 3a f2 73 | 70 72 73 6d 65 6e 75 28 |ath$):.s|prsmenu(|
|000009e0| 73 70 72 73 6d 65 6e 75 | 25 29 0d 00 50 30 20 f2 |sprsmenu|%)..P0 .|
|000009f0| 73 6f 75 6e 64 73 28 73 | 6f 75 6e 64 5f 70 61 74 |sounds(s|ound_pat|
|00000a00| 68 24 29 3a f2 73 6f 75 | 6e 64 6d 65 6e 75 28 73 |h$):.sou|ndmenu(s|
|00000a10| 6f 75 6e 64 6d 65 6e 75 | 25 29 0d 00 64 43 20 f2 |oundmenu|%)..dC .|
|00000a20| 70 61 6c 69 6e 69 74 3a | 69 62 61 72 31 25 3d a4 |palinit:|ibar1%=.|
|00000a30| 69 63 6f 6e 64 65 66 28 | 2d 31 2c 30 2c 30 2c 36 |icondef(|-1,0,0,6|
|00000a40| 38 2c 36 38 2c 26 33 30 | 30 32 2c 22 21 44 5f 54 |8,68,&30|02,"!D_T|
|00000a50| 75 72 74 6c 65 22 2c 30 | 2c 30 2c 30 29 0d 00 78 |urtle",0|,0,0)..x|
|00000a60| 18 20 c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 53 |. .."Hou|rglass_S|
|00000a70| 6d 61 73 68 22 0d 00 82 | 04 0d 00 8c 0e 20 63 6c |mash"...|..... cl|
|00000a80| 6f 73 65 64 25 3d b9 0d | 00 96 1e 20 ee 20 85 20 |osed%=..|... . . |
|00000a90| e7 20 a4 77 69 6d 70 65 | 72 72 6f 72 20 8b 20 f2 |. .wimpe|rror . .|
|00000aa0| 65 72 72 6f 72 0d 00 a0 | 06 20 f5 0d 00 aa 2f 20 |error...|. ..../ |
|00000ab0| 20 e7 20 63 6c 6f 73 65 | 64 25 20 f2 69 63 6f 6e | . close|d% .icon|
|00000ac0| 62 61 72 77 61 69 74 3a | e7 20 71 75 69 74 25 3d |barwait:|. quit%=|
|00000ad0| b9 20 f2 71 75 69 74 5f | 69 74 0d 00 ab 0d 20 20 |. .quit_|it.... |
|00000ae0| f2 72 65 67 62 6f 78 0d | 00 b4 16 20 20 f2 63 68 |.regbox.|... .ch|
|00000af0| 65 63 6b 5f 73 75 69 74 | 5f 6d 6f 64 65 0d 00 be |eck_suit|_mode...|
|00000b00| 13 20 20 e7 20 63 6c 6f | 73 65 64 25 3d a3 20 8c |. . clo|sed%=. .|
|00000b10| 0d 00 c8 1d 20 20 20 f2 | 6f 70 65 6e 77 69 6e 64 |.... .|openwind|
|00000b20| 6f 77 28 77 68 61 6e 64 | 6c 65 31 25 29 0d 00 d2 |ow(whand|le1%)...|
|00000b30| 35 20 20 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |5 .."W|imp_SetC|
|00000b40| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 77 68 |aretPosi|tion",wh|
|00000b50| 61 6e 64 6c 65 31 25 2c | 30 2c 30 2c 2c 2d 31 2c |andle1%,|0,0,,-1,|
|00000b60| 2d 31 0d 00 dc 2b 20 20 | 20 78 30 25 3d 30 3a 79 |-1...+ | x0%=0:y|
|00000b70| 30 25 3d 30 3a 71 75 69 | 74 25 3d a3 3a 63 6c 6f |0%=0:qui|t%=.:clo|
|00000b80| 73 65 64 25 3d a3 3a 65 | 6e 64 25 3d a3 0d 00 e6 |sed%=.:e|nd%=....|
|00000b90| 08 20 20 20 f5 0d 00 f0 | 0d 20 20 20 20 f2 70 6f |. ....|. .po|
|00000ba0| 6c 6c 0d 00 fa 1f 20 20 | 20 fd 20 71 75 69 74 25 |ll.... | . quit%|
|00000bb0| 20 84 20 63 6c 6f 73 65 | 64 25 20 84 20 65 6e 64 | . close|d% . end|
|00000bc0| 25 0d 01 04 07 20 20 cd | 0d 01 18 16 20 20 e7 20 |%.... .|.... . |
|00000bd0| 71 75 69 74 25 20 f2 71 | 75 69 74 5f 69 74 0d 01 |quit% .q|uit_it..|
|00000be0| 22 3f 20 20 63 6c 6f 73 | 65 64 25 3d b9 3a 62 6c |"? clos|ed%=.:bl|
|00000bf0| 6f 63 6b 25 21 30 3d 77 | 68 61 6e 64 6c 65 31 25 |ock%!0=w|handle1%|
|00000c00| 3a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |:.."Wimp|_CloseWi|
|00000c10| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 01 2c |ndow",,b|lock%..,|
|00000c20| 1d 20 20 c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |. .."Wi|mp_Creat|
|00000c30| 65 4d 65 6e 75 22 2c 2c | 2d 31 0d 01 36 0c 20 fd |eMenu",,|-1..6. .|
|00000c40| 20 71 75 69 74 25 0d 01 | 40 10 20 f4 2d 2d 2d 2d | quit%..|@. .----|
|00000c50| 2d 2d 2d 2d 2d 2d 0d 01 | 4a 0e 20 dd f2 71 75 69 |------..|J. ..qui|
|00000c60| 74 5f 69 74 0d 01 54 53 | 20 c8 99 22 53 6f 75 6e |t_it..TS| .."Soun|
|00000c70| 64 5f 52 65 6d 6f 76 65 | 56 6f 69 63 65 22 2c 2c |d_Remove|Voice",,|
|00000c80| 31 30 3a 24 62 6c 6f 63 | 6b 25 3d 22 54 41 53 4b |10:$bloc|k%="TASK|
|00000c90| 22 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |":.."Wim|p_CloseD|
|00000ca0| 6f 77 6e 22 2c 74 61 73 | 6b 25 2c 21 62 6c 6f 63 |own",tas|k%,!bloc|
|00000cb0| 6b 25 3a c8 98 3a e1 0d | 01 72 10 20 f4 2d 2d 2d |k%:..:..|.r. .---|
|00000cc0| 2d 2d 2d 2d 2d 2d 2d 0d | 01 7c 12 20 dd f2 69 63 |-------.|.|. ..ic|
|00000cd0| 6f 6e 62 61 72 77 61 69 | 74 0d 01 86 1d 20 65 6e |onbarwai|t.... en|
|00000ce0| 64 25 3d a3 3a 63 6c 6f | 73 65 64 25 3d a3 3a 71 |d%=.:clo|sed%=.:q|
|00000cf0| 75 69 74 25 3d a3 0d 01 | 90 06 20 f5 0d 01 9a 25 |uit%=...|.. ....%|
|00000d00| 20 20 c8 99 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c | .."Wim|p_Poll",|
|00000d10| 2c 62 6c 6f 63 6b 25 20 | b8 20 72 65 61 73 6f 6e |,block% |. reason|
|00000d20| 25 0d 01 a4 12 20 20 c8 | 8e 20 72 65 61 73 6f 6e |%.... .|. reason|
|00000d30| 25 20 ca 0d 01 ae 11 20 | 20 20 c9 20 36 3a f2 6d |% ..... | . 6:.m|
|00000d40| 6f 75 73 65 0d 01 b8 28 | 20 20 20 c9 20 38 3a c8 |ouse...(| . 8:.|
|00000d50| 99 22 57 69 6d 70 5f 50 | 72 6f 63 65 73 73 4b 65 |."Wimp_P|rocessKe|
|00000d60| 79 22 2c 62 6c 6f 63 6b | 25 21 32 34 0d 01 c2 1a |y",block|%!24....|
|00000d70| 20 20 20 c9 20 39 3a f2 | 69 63 6f 6e 62 61 72 6f | . 9:.|iconbaro|
|00000d80| 70 74 69 6f 6e 73 0d 01 | cc 1c 20 20 20 c9 20 31 |ptions..|.. . 1|
|00000d90| 37 2c 31 38 3a f2 72 65 | 63 65 69 76 65 64 61 74 |7,18:.re|ceivedat|
|00000da0| 61 32 0d 01 d6 07 20 20 | cb 0d 01 e0 13 20 fd 20 |a2.... |..... . |
|00000db0| 65 6e 64 25 20 84 20 71 | 75 69 74 25 0d 01 ea 06 |end% . q|uit%....|
|00000dc0| 20 e1 0d 01 f4 11 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00000dd0| 2d 2d 2d 0d 01 fe 41 20 | dd f2 69 63 6f 6e 62 61 |---...A |..iconba|
|00000de0| 72 6f 70 74 69 6f 6e 73 | 3a 63 68 6f 69 63 65 25 |roptions|:choice%|
|00000df0| 3d 21 62 6c 6f 63 6b 25 | 3a e7 20 63 68 6f 69 63 |=!block%|:. choic|
|00000e00| 65 25 3d 31 20 f2 76 65 | 72 69 66 79 73 68 75 74 |e%=1 .ve|rifyshut|
|00000e10| 64 6f 77 6e 0d 02 12 06 | 20 e1 0d 02 1c 10 20 f4 |down....| ..... .|
|00000e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 02 26 0b 20 dd |--------|--..&. .|
|00000e30| f2 70 6f 6c 6c 0d 02 30 | 25 20 c8 99 22 57 69 6d |.poll..0|% .."Wim|
|00000e40| 70 5f 50 6f 6c 6c 22 2c | 30 2c 62 6c 6f 63 6b 25 |p_Poll",|0,block%|
|00000e50| 20 b8 20 72 65 61 73 6f | 6e 25 0d 02 3a 11 20 c8 | . reaso|n%..:. .|
|00000e60| 8e 20 72 65 61 73 6f 6e | 25 20 ca 0d 02 44 10 20 |. reason|% ...D. |
|00000e70| c9 20 31 3a f2 72 65 64 | 72 61 77 0d 02 4e 24 20 |. 1:.red|raw..N$ |
|00000e80| c9 20 32 3a c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |. 2:.."W|imp_Open|
|00000e90| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00000ea0| 02 58 08 20 c9 20 33 0d | 02 62 2d 20 20 e7 20 62 |.X. . 3.|.b- . b|
|00000eb0| 6c 6f 63 6b 25 21 30 3d | 77 68 61 6e 64 6c 65 31 |lock%!0=|whandle1|
|00000ec0| 25 20 f2 73 68 75 74 61 | 6c 6c 3a 63 6c 6f 73 65 |% .shuta|ll:close|
|00000ed0| 64 25 3d b9 0d 02 6c 43 | 20 20 e7 20 62 6c 6f 63 |d%=...lC| . bloc|
|00000ee0| 6b 25 21 30 3d 77 68 61 | 6e 64 6c 65 37 25 3a c8 |k%!0=wha|ndle7%:.|
|00000ef0| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 |."Wimp_C|loseWind|
|00000f00| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 3a 68 65 6c 70 |ow",,blo|ck%:help|
|00000f10| 5f 70 61 67 65 3d 31 0d | 02 76 37 20 20 e7 20 62 |_page=1.|.v7 . b|
|00000f20| 6c 6f 63 6b 25 21 30 3d | 77 68 61 6e 64 6c 65 38 |lock%!0=|whandle8|
|00000f30| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|00000f40| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 02 |indow",,|block%..|
|00000f50| 80 38 20 20 e7 20 62 6c | 6f 63 6b 25 21 30 3d 77 |.8 . bl|ock%!0=w|
|00000f60| 68 61 6e 64 6c 65 36 61 | 25 3a c8 99 22 57 69 6d |handle6a|%:.."Wim|
|00000f70| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|00000f80| 62 6c 6f 63 6b 25 0d 02 | 8a 39 20 20 e7 20 62 6c |block%..|.9 . bl|
|00000f90| 6f 63 6b 25 21 30 3d 77 | 68 61 6e 64 6c 65 31 30 |ock%!0=w|handle10|
|00000fa0| 61 25 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |a%:.."Wi|mp_Close|
|00000fb0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00000fc0| 02 94 13 20 c9 20 36 3a | f2 65 64 69 74 6d 6f 75 |... . 6:|.editmou|
|00000fd0| 73 65 0d 02 9e 19 20 c9 | 20 37 3a f2 63 61 6c 6c |se.... .| 7:.call|
|00000fe0| 73 61 76 65 72 6f 75 74 | 69 6e 65 0d 02 a8 42 20 |saverout|ine...B |
|00000ff0| c9 20 38 3a c8 99 22 57 | 69 6d 70 5f 50 72 6f 63 |. 8:.."W|imp_Proc|
|00001000| 65 73 73 4b 65 79 22 2c | 62 6c 6f 63 6b 25 21 32 |essKey",|block%!2|
|00001010| 34 3a f2 6b 65 79 70 72 | 65 73 73 3a f2 64 69 73 |4:.keypr|ess:.dis|
|00001020| 70 6c 61 79 5f 70 6f 73 | 69 74 69 6f 6e 0d 02 b2 |play_pos|ition...|
|00001030| 16 20 c9 20 39 3a f2 6f | 70 74 69 6f 6e 73 65 6c |. . 9:.o|ptionsel|
|00001040| 65 63 74 0d 02 bc 39 20 | c9 20 31 30 3a c8 99 22 |ect...9 |. 10:.."|
|00001050| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00001060| 22 2c 77 68 61 6e 64 6c | 65 31 25 2c 30 2c 2d 39 |",whandl|e1%,0,-9|
|00001070| 35 30 2c 31 30 35 30 2c | 2d 38 30 30 0d 02 c6 19 |50,1050,|-800....|
|00001080| 20 c9 20 31 37 2c 31 38 | 3a f2 72 65 63 65 69 76 | . 17,18|:.receiv|
|00001090| 65 64 61 74 61 0d 02 d0 | 06 20 cb 0d 02 da 2f 20 |edata...|. ..../ |
|000010a0| e7 20 66 6c 61 67 67 25 | 3d b9 20 f2 65 78 65 63 |. flagg%|=. .exec|
|000010b0| 75 74 65 5f 63 6f 64 65 | 3a f2 64 69 73 70 6c 61 |ute_code|:.displa|
|000010c0| 79 5f 70 6f 73 69 74 69 | 6f 6e 0d 02 e4 06 20 e1 |y_positi|on.... .|
|000010d0| 0d 02 ee 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|000010e0| 0d 02 f8 16 20 dd f2 63 | 61 6c 6c 73 61 76 65 72 |.... ..c|allsaver|
|000010f0| 6f 75 74 69 6e 65 0d 03 | 02 17 20 e7 20 6f 75 74 |outine..|.. . out|
|00001100| 25 3d 33 20 f2 63 61 6c | 6c 73 61 76 65 0d 03 0c |%=3 .cal|lsave...|
|00001110| 18 20 e7 20 6f 75 74 25 | 3d 38 20 f2 63 61 6c 6c |. . out%|=8 .call|
|00001120| 73 61 76 65 32 0d 03 16 | 06 20 e1 0d 03 20 10 20 |save2...|. ... . |
|00001130| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 03 2a 4a 20 |.-------|---..*J |
|00001140| dd f2 73 68 75 74 61 6c | 6c 3a 62 6c 6f 63 6b 25 |..shutal|l:block%|
|00001150| 21 30 3d 77 68 61 6e 64 | 6c 65 31 25 3a c8 99 22 |!0=whand|le1%:.."|
|00001160| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00001170| 22 2c 2c 62 6c 6f 63 6b | 25 3a f2 73 68 75 74 61 |",,block|%:.shuta|
|00001180| 6c 6c 32 3a e1 0d 03 34 | 10 20 f4 2d 2d 2d 2d 2d |ll2:...4|. .-----|
|00001190| 2d 2d 2d 2d 2d 0d 03 3e | 0f 20 dd f2 73 68 75 74 |-----..>|. ..shut|
|000011a0| 61 6c 6c 32 0d 03 48 4f | 20 f7 20 8d 44 52 43 3a |all2..HO| . .DRC:|
|000011b0| f5 3a f3 20 77 68 3a 20 | 62 6c 6f 63 6b 25 21 30 |.:. wh: |block%!0|
|000011c0| 3d 77 68 3a 3a c8 99 22 | 57 69 6d 70 5f 43 6c 6f |=wh::.."|Wimp_Clo|
|000011d0| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |seWindow|",,block|
|000011e0| 25 3a fd 20 77 68 3d 77 | 68 61 6e 64 6c 65 31 34 |%:. wh=w|handle14|
|000011f0| 25 3a e1 0d 03 52 6e 20 | dc 20 77 68 61 6e 64 6c |%:...Rn |. whandl|
|00001200| 65 32 25 2c 77 68 61 6e | 64 6c 65 33 25 2c 77 68 |e2%,whan|dle3%,wh|
|00001210| 61 6e 64 6c 65 34 25 2c | 77 68 61 6e 64 6c 65 35 |andle4%,|whandle5|
|00001220| 25 2c 77 68 61 6e 64 6c | 65 36 25 2c 77 68 61 6e |%,whandl|e6%,whan|
|00001230| 64 6c 65 36 61 25 2c 77 | 68 61 6e 64 6c 65 31 30 |dle6a%,w|handle10|
|00001240| 61 25 2c 77 68 61 6e 64 | 6c 65 37 25 2c 77 68 61 |a%,whand|le7%,wha|
|00001250| 6e 64 6c 65 38 25 2c 77 | 68 61 6e 64 6c 65 31 34 |ndle8%,w|handle14|
|00001260| 25 0d 03 5c 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |%..\. .-|--------|
|00001270| 2d 0d 03 66 11 20 dd f2 | 72 65 61 64 5f 63 61 72 |-..f. ..|read_car|
|00001280| 65 74 0d 03 70 3f 20 c8 | 99 22 57 69 6d 70 5f 47 |et..p? .|."Wimp_G|
|00001290| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|000012a0| 2c 2c 62 6c 6f 63 6b 32 | 25 3a e7 20 62 6c 6f 63 |,,block2|%:. bloc|
|000012b0| 6b 32 25 21 30 3d 77 68 | 61 6e 64 6c 65 35 25 20 |k2%!0=wh|andle5% |
|000012c0| e1 0d 03 7a 35 20 c8 99 | 22 57 69 6d 70 5f 53 65 |...z5 ..|"Wimp_Se|
|000012d0| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|000012e0| 77 68 61 6e 64 6c 65 31 | 25 2c 32 2c 30 2c 2c 2d |whandle1|%,2,0,,-|
|000012f0| 31 2c 2d 31 3a e1 0d 03 | 8e 10 20 f4 2d 2d 2d 2d |1,-1:...|.. .----|
|00001300| 2d 2d 2d 2d 2d 2d 0d 03 | 98 0f 20 dd f2 6b 65 79 |------..|.. ..key|
|00001310| 70 72 65 73 73 0d 03 a2 | 4c 20 49 25 3d 62 6c 6f |press...|L I%=blo|
|00001320| 63 6b 25 21 34 3a 4b 25 | 3d 62 6c 6f 63 6b 25 21 |ck%!4:K%|=block%!|
|00001330| 32 34 3a 61 62 6f 72 74 | 3d 30 3a 77 69 6e 25 3d |24:abort|=0:win%=|
|00001340| 62 6c 6f 63 6b 25 21 30 | 3a f2 69 73 65 74 67 65 |block%!0|:.isetge|
|00001350| 6e 28 77 68 61 6e 64 6c | 65 31 25 2c 33 2c 22 22 |n(whandl|e1%,3,""|
|00001360| 29 0d 03 ac 0e 20 c8 8e | 20 77 69 6e 25 20 ca 0d |).... ..| win% ..|
|00001370| 03 c0 10 20 c9 20 77 68 | 61 6e 64 6c 65 31 25 0d |... . wh|andle1%.|
|00001380| 03 ca 11 20 e7 20 4b 25 | 3c 3e 31 33 20 cb 3a e1 |... . K%|<>13 .:.|
|00001390| 0d 03 d4 42 20 63 6f 70 | 79 5f 63 6f 75 6e 74 3d |...B cop|y_count=|
|000013a0| 32 3a 62 6c 6f 63 6b 25 | 21 30 3d 77 68 61 6e 64 |2:block%|!0=whand|
|000013b0| 6c 65 36 61 25 3a c8 99 | 22 57 69 6d 70 5f 43 6c |le6a%:..|"Wimp_Cl|
|000013c0| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|000013d0| 6b 25 0d 03 de 36 20 62 | 6c 6f 63 6b 25 21 30 3d |k%...6 b|lock%!0=|
|000013e0| 77 68 61 6e 64 6c 65 31 | 30 61 25 3a c8 99 22 57 |whandle1|0a%:.."W|
|000013f0| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00001400| 2c 2c 62 6c 6f 63 6b 25 | 0d 03 e8 34 20 f2 69 72 |,,block%|...4 .ir|
|00001410| 65 61 64 67 65 6e 28 77 | 68 61 6e 64 6c 65 31 25 |eadgen(w|handle1%|
|00001420| 2c 30 29 3a f2 69 73 65 | 74 67 65 6e 28 77 68 61 |,0):.ise|tgen(wha|
|00001430| 6e 64 6c 65 31 25 2c 30 | 2c 22 22 29 0d 03 f2 3e |ndle1%,0|,"")...>|
|00001440| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 61 72 65 | .."Wimp|_SetCare|
|00001450| 74 50 6f 73 69 74 69 6f | 6e 22 2c 77 68 61 6e 64 |tPositio|n",whand|
|00001460| 6c 65 31 25 2c 30 2c 30 | 2c 2c 2d 31 2c 2d 31 3a |le1%,0,0|,,-1,-1:|
|00001470| f2 6d 69 6e 69 5f 70 6f | 6c 6c 0d 03 fc 1c 20 c8 |.mini_po|ll.... .|
|00001480| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |."Wimp_C|reateMen|
|00001490| 75 22 2c 2c 2d 31 0d 04 | 06 44 20 e3 20 46 25 3d |u",,-1..|.D . F%=|
|000014a0| 31 20 b8 20 35 30 3a 52 | 65 70 65 61 74 70 61 64 |1 . 50:R|epeatpad|
|000014b0| 24 28 46 25 29 3d 22 22 | 3a 56 69 72 5f 50 72 6f |$(F%)=""|:Vir_Pro|
|000014c0| 31 24 28 46 25 2c 30 29 | 3d 22 22 3a 52 65 70 65 |1$(F%,0)|="":Repe|
|000014d0| 61 74 28 46 25 29 3d 30 | 3a ed 0d 04 10 41 20 52 |at(F%)=0|:....A R|
|000014e0| 65 70 65 61 74 70 61 64 | 24 28 31 29 3d 22 44 65 |epeatpad|$(1)="De|
|000014f0| 66 61 75 6c 74 22 3a 52 | 65 70 65 61 74 70 61 64 |fault":R|epeatpad|
|00001500| 24 28 32 29 3d 61 24 3a | f2 6c 6f 6f 6b 6d 75 6c |$(2)=a$:|.lookmul|
|00001510| 74 69 3a 66 6c 61 67 67 | 25 3d b9 0d 04 1a 31 20 |ti:flagg|%=....1 |
|00001520| e3 20 46 25 3d 31 20 b8 | 20 35 30 3a 56 69 72 5f |. F%=1 .| 50:Vir_|
|00001530| 50 72 6f 31 24 28 46 25 | 2c 30 29 3d 52 65 70 65 |Pro1$(F%|,0)=Repe|
|00001540| 61 74 70 61 64 24 28 46 | 25 29 3a ed 0d 04 24 16 |atpad$(F|%):...$.|
|00001550| 20 f2 73 65 74 75 70 5f | 56 69 72 70 72 6f 31 28 | .setup_|Virpro1(|
|00001560| 30 29 0d 04 2e 14 20 e7 | 20 63 6f 6d 6d 61 6e 64 |0).... .| command|
|00001570| 73 25 3e 32 20 8c 0d 04 | 38 1a 20 20 e3 20 6c 6f |s%>2 ...|8. . lo|
|00001580| 6f 70 3d 32 20 b8 20 63 | 6f 6d 6d 61 6e 64 73 25 |op=2 . c|ommands%|
|00001590| 0d 04 42 6a 20 20 20 e7 | 20 c0 56 69 72 5f 50 72 |..Bj .| .Vir_Pr|
|000015a0| 6f 31 24 28 6c 6f 6f 70 | 2c 30 29 2c 32 29 3d 22 |o1$(loop|,0),2)="|
|000015b0| 54 4f 22 20 f2 74 6f 5f | 65 72 72 6f 72 3a 66 6c |TO" .to_|error:fl|
|000015c0| 61 67 67 25 3d a3 3a c8 | 99 22 57 69 6d 70 5f 46 |agg%=.:.|."Wimp_F|
|000015d0| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 77 68 61 6e |orceRedr|aw",whan|
|000015e0| 64 6c 65 31 25 2c 32 30 | 2c 2d 37 38 38 2c 2c 31 |dle1%,20|,-788,,1|
|000015f0| 30 32 38 2c 2d 31 33 36 | 3a e1 0d 04 4c 6a 20 20 |028,-136|:...Lj |
|00001600| 20 e7 20 c0 56 69 72 5f | 50 72 6f 31 24 28 6c 6f | . .Vir_|Pro1$(lo|
|00001610| 6f 70 2c 30 29 2c 32 29 | 3d 22 74 6f 22 20 f2 74 |op,0),2)|="to" .t|
|00001620| 6f 5f 65 72 72 6f 72 3a | 66 6c 61 67 67 25 3d a3 |o_error:|flagg%=.|
|00001630| 3a c8 99 22 57 69 6d 70 | 5f 46 6f 72 63 65 52 65 |:.."Wimp|_ForceRe|
|00001640| 64 72 61 77 22 2c 77 68 | 61 6e 64 6c 65 31 25 2c |draw",wh|andle1%,|
|00001650| 32 30 2c 2d 37 38 38 2c | 2c 31 30 32 38 2c 2d 31 |20,-788,|,1028,-1|
|00001660| 33 36 3a e1 0d 04 56 07 | 20 20 ed 0d 04 60 06 20 |36:...V.| ...`. |
|00001670| cd 0d 04 6a 14 20 e7 20 | 63 6f 6d 6d 61 6e 64 73 |...j. . |commands|
|00001680| 25 3e 32 20 8c 0d 04 74 | 25 20 20 e7 20 c0 56 69 |%>2 ...t|% . .Vi|
|00001690| 72 5f 50 72 6f 31 24 28 | 32 2c 30 29 2c 36 29 3d |r_Pro1$(|2,0),6)=|
|000016a0| 22 52 45 50 45 41 54 22 | 20 8c 0d 04 7e 4a 20 20 |"REPEAT"| ...~J |
|000016b0| 20 e7 20 c0 56 69 72 5f | 50 72 6f 31 24 28 63 6f | . .Vir_|Pro1$(co|
|000016c0| 6d 6d 61 6e 64 73 25 2c | 30 29 2c 33 29 3d 22 65 |mmands%,|0),3)="e|
|000016d0| 6e 64 22 20 c0 56 69 72 | 5f 50 72 6f 31 24 28 63 |nd" .Vir|_Pro1$(c|
|000016e0| 6f 6d 6d 61 6e 64 73 25 | 2c 30 29 2c 33 29 3d 22 |ommands%|,0),3)="|
|000016f0| 45 4e 44 22 0d 04 88 40 | 20 20 20 e7 20 c0 56 69 |END"...@| . .Vi|
|00001700| 72 5f 50 72 6f 31 24 28 | 63 6f 6d 6d 61 6e 64 73 |r_Pro1$(|commands|
|00001710| 25 2c 30 29 2c 33 29 3c | 3e 22 45 4e 44 22 20 f2 |%,0),3)<|>"END" .|
|00001720| 72 65 70 5f 65 72 72 6f | 72 3a 66 6c 61 67 67 25 |rep_erro|r:flagg%|
|00001730| 3d a3 3a e1 0d 04 92 07 | 20 20 cd 0d 04 9c 41 20 |=.:.....| ....A |
|00001740| 20 e7 20 c0 56 69 72 5f | 50 72 6f 31 24 28 63 6f | . .Vir_|Pro1$(co|
|00001750| 6d 6d 61 6e 64 73 25 2c | 30 29 2c 36 29 3d 22 52 |mmands%,|0),6)="R|
|00001760| 45 50 45 41 54 22 20 f2 | 72 65 70 5f 65 72 72 6f |EPEAT" .|rep_erro|
|00001770| 72 3a 66 6c 61 67 67 25 | 3d a3 3a e1 0d 04 a6 06 |r:flagg%|=.:.....|
|00001780| 20 cd 0d 04 b0 4e 20 e7 | 20 63 6f 6d 6d 61 6e 64 | ....N .| command|
|00001790| 73 25 3d 32 20 80 20 c0 | 56 69 72 5f 50 72 6f 31 |s%=2 . .|Vir_Pro1|
|000017a0| 24 28 32 2c 30 29 2c 36 | 29 3d 22 72 65 70 65 61 |$(2,0),6|)="repea|
|000017b0| 74 22 20 c1 56 69 72 5f | 50 72 6f 31 24 28 32 2c |t" .Vir_|Pro1$(2,|
|000017c0| 30 29 2c 31 2c 36 29 3d | 22 52 45 50 45 41 54 22 |0),1,6)=|"REPEAT"|
|000017d0| 0d 04 ba 48 20 e7 20 63 | 6f 6d 6d 61 6e 64 73 25 |...H . c|ommands%|
|000017e0| 3d 32 20 80 20 c0 56 69 | 72 5f 50 72 6f 31 24 28 |=2 . .Vi|r_Pro1$(|
|000017f0| 32 2c 30 29 2c 33 29 3d | 22 74 6f 20 22 20 c1 56 |2,0),3)=|"to " .V|
|00001800| 69 72 5f 50 72 6f 31 24 | 28 32 2c 30 29 2c 31 2c |ir_Pro1$|(2,0),1,|
|00001810| 33 29 3d 22 54 4f 20 22 | 0d 04 c4 38 20 e7 20 63 |3)="TO "|...8 . c|
|00001820| 6f 6d 6d 61 6e 64 73 25 | 3d 32 20 80 20 c0 56 69 |ommands%|=2 . .Vi|
|00001830| 72 5f 50 72 6f 31 24 28 | 32 2c 30 29 2c 36 29 3d |r_Pro1$(|2,0),6)=|
|00001840| 22 52 45 50 45 41 54 22 | 20 f2 72 65 70 65 61 74 |"REPEAT"| .repeat|
|00001850| 0d 04 ce 2f 20 e7 20 63 | 6f 6d 6d 61 6e 64 73 25 |.../ . c|ommands%|
|00001860| 3d 32 20 80 20 c0 56 69 | 72 5f 50 72 6f 31 24 28 |=2 . .Vi|r_Pro1$(|
|00001870| 32 2c 30 29 2c 33 29 3d | 22 54 4f 20 22 20 8c 0d |2,0),3)=|"TO " ..|
|00001880| 04 d8 26 20 20 20 43 43 | 24 3d 56 69 72 5f 50 72 |..& CC|$=Vir_Pr|
|00001890| 6f 31 24 28 32 2c 30 29 | 3a f2 74 6f 3a 66 6c 61 |o1$(2,0)|:.to:fla|
|000018a0| 67 67 25 3d a3 0d 04 e2 | 06 20 cd 0d 04 ec 38 20 |gg%=....|. ....8 |
|000018b0| c8 99 22 57 69 6d 70 5f | 46 6f 72 63 65 52 65 64 |.."Wimp_|ForceRed|
|000018c0| 72 61 77 22 2c 77 68 61 | 6e 64 6c 65 31 25 2c 32 |raw",wha|ndle1%,2|
|000018d0| 30 2c 2d 37 38 38 2c 2c | 31 30 32 38 2c 2d 31 33 |0,-788,,|1028,-13|
|000018e0| 36 3a e1 0d 04 f6 04 0d | 05 00 10 20 c9 20 77 68 |6:......|... . wh|
|000018f0| 61 6e 64 6c 65 34 25 0d | 05 0a 18 20 e7 20 4b 25 |andle4%.|... . K%|
|00001900| 3d 26 31 38 45 20 80 20 | 49 25 3c 31 35 20 8c 0d |=&18E . |I%<15 ..|
|00001910| 05 14 20 20 20 49 25 2b | 3d 31 3a f2 63 61 72 65 |.. I%+|=1:.care|
|00001920| 74 28 49 25 2c 77 68 61 | 6e 64 6c 65 34 25 29 0d |t(I%,wha|ndle4%).|
|00001930| 05 1e 06 20 cd 0d 05 28 | 17 20 e7 20 4b 25 3d 26 |... ...(|. . K%=&|
|00001940| 31 38 46 20 80 20 49 25 | 3e 32 20 8c 0d 05 32 20 |18F . I%|>2 ...2 |
|00001950| 20 20 49 25 2d 3d 31 3a | f2 63 61 72 65 74 28 49 | I%-=1:|.caret(I|
|00001960| 25 2c 77 68 61 6e 64 6c | 65 34 25 29 0d 05 3c 06 |%,whandl|e4%)..<.|
|00001970| 20 cd 0d 05 46 22 20 e7 | 20 4b 25 3d 26 31 39 46 | ...F" .| K%=&19F|
|00001980| 20 f2 73 68 75 6e 74 75 | 70 28 77 68 61 6e 64 6c | .shuntu|p(whandl|
|00001990| 65 34 25 29 0d 05 50 10 | 20 e7 20 4b 25 3d 26 31 |e4%)..P.| . K%=&1|
|000019a0| 39 45 20 8c 0d 05 5a 1b | 20 20 f2 73 68 75 6e 74 |9E ...Z.| .shunt|
|000019b0| 64 6f 77 6e 28 77 68 61 | 6e 64 6c 65 34 25 29 0d |down(wha|ndle4%).|
|000019c0| 05 64 28 20 20 e7 20 49 | 25 3c 31 34 20 49 25 2b |.d( . I|%<14 I%+|
|000019d0| 3d 31 3a f2 63 61 72 65 | 74 28 49 25 2c 77 68 61 |=1:.care|t(I%,wha|
|000019e0| 6e 64 6c 65 34 25 29 0d | 05 6e 06 20 cd 0d 05 78 |ndle4%).|.n. ...x|
|000019f0| 0e 20 e7 20 4b 25 3d 31 | 33 20 8c 0d 05 82 27 20 |. . K%=1|3 ....' |
|00001a00| 20 c8 99 22 57 69 6d 70 | 5f 47 65 74 43 61 72 65 | .."Wimp|_GetCare|
|00001a10| 74 50 6f 73 69 74 69 6f | 6e 22 2c 2c 62 6c 6f 63 |tPositio|n",,bloc|
|00001a20| 6b 25 0d 05 8c 17 20 20 | 63 75 72 5f 70 6f 73 3d |k%.... |cur_pos=|
|00001a30| 62 6c 6f 63 6b 25 21 32 | 30 0d 05 96 4e 20 20 e7 |block%!2|0...N .|
|00001a40| 20 63 75 72 5f 70 6f 73 | 3d 30 20 f2 73 68 75 6e | cur_pos|=0 .shun|
|00001a50| 74 64 6f 77 6e 28 77 68 | 61 6e 64 6c 65 34 25 29 |tdown(wh|andle4%)|
|00001a60| 20 8b 20 e7 20 49 25 3c | 31 34 20 49 25 3d 49 25 | . . I%<|14 I%=I%|
|00001a70| 2b 31 3a f2 63 61 72 65 | 74 28 49 25 2c 77 68 61 |+1:.care|t(I%,wha|
|00001a80| 6e 64 6c 65 34 25 29 0d | 05 a0 06 20 cd 0d 05 aa |ndle4%).|... ....|
|00001a90| 06 20 e1 0d 05 b4 04 0d | 05 be 10 20 c9 20 77 68 |. ......|... . wh|
|00001aa0| 61 6e 64 6c 65 35 25 0d | 05 c8 33 20 e7 20 4b 25 |andle5%.|..3 . K%|
|00001ab0| 3d 26 31 38 45 20 80 20 | 49 25 3c 31 35 20 49 25 |=&18E . |I%<15 I%|
|00001ac0| 3d 49 25 2b 31 3a f2 63 | 61 72 65 74 28 49 25 2c |=I%+1:.c|aret(I%,|
|00001ad0| 77 68 61 6e 64 6c 65 35 | 25 29 0d 05 d2 17 20 e7 |whandle5|%).... .|
|00001ae0| 20 4b 25 3d 26 31 38 46 | 20 80 20 49 25 3e 32 20 | K%=&18F| . I%>2 |
|00001af0| 8c 0d 05 dc 22 20 20 49 | 25 3d 49 25 2d 31 3a f2 |...." I|%=I%-1:.|
|00001b00| 63 61 72 65 74 28 49 25 | 2c 77 68 61 6e 64 6c 65 |caret(I%|,whandle|
|00001b10| 35 25 29 0d 05 e6 06 20 | cd 0d 05 f0 22 20 e7 20 |5%).... |...." . |
|00001b20| 4b 25 3d 26 31 39 46 20 | f2 73 68 75 6e 74 75 70 |K%=&19F |.shuntup|
|00001b30| 28 77 68 61 6e 64 6c 65 | 35 25 29 0d 05 fa 10 20 |(whandle|5%).... |
|00001b40| e7 20 4b 25 3d 26 31 39 | 45 20 8c 0d 06 04 1b 20 |. K%=&19|E ..... |
|00001b50| 20 f2 73 68 75 6e 74 64 | 6f 77 6e 28 77 68 61 6e | .shuntd|own(whan|
|00001b60| 64 6c 65 35 25 29 0d 06 | 0e 28 20 20 e7 20 49 25 |dle5%)..|.( . I%|
|00001b70| 3c 31 34 20 49 25 2b 3d | 31 3a f2 63 61 72 65 74 |<14 I%+=|1:.caret|
|00001b80| 28 49 25 2c 77 68 61 6e | 64 6c 65 35 25 29 0d 06 |(I%,whan|dle5%)..|
|00001b90| 18 06 20 cd 0d 06 22 0e | 20 e7 20 4b 25 3d 31 33 |.. ...".| . K%=13|
|00001ba0| 20 8c 0d 06 2c 27 20 20 | c8 99 22 57 69 6d 70 5f | ...,' |.."Wimp_|
|00001bb0| 47 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |GetCaret|Position|
|00001bc0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 06 36 39 20 20 63 |",,block|%..69 c|
|00001bd0| 75 72 5f 70 6f 73 3d 62 | 6c 6f 63 6b 25 21 32 30 |ur_pos=b|lock%!20|
|00001be0| 3a e7 20 63 75 72 5f 70 | 6f 73 3d 30 20 f2 73 68 |:. cur_p|os=0 .sh|
|00001bf0| 75 6e 74 64 6f 77 6e 28 | 77 68 61 6e 64 6c 65 35 |untdown(|whandle5|
|00001c00| 25 29 0d 06 40 2a 20 20 | e7 20 49 25 3c 31 35 20 |%)..@* |. I%<15 |
|00001c10| 49 25 3d 49 25 2b 31 3a | f2 63 61 72 65 74 28 49 |I%=I%+1:|.caret(I|
|00001c20| 25 2c 77 68 61 6e 64 6c | 65 35 25 29 0d 06 4a 06 |%,whandl|e5%)..J.|
|00001c30| 20 cd 0d 06 54 06 20 e1 | 0d 06 5e 04 0d 06 68 10 | ...T. .|..^...h.|
|00001c40| 20 c9 20 77 68 61 6e 64 | 6c 65 33 25 0d 06 72 3c | . whand|le3%..r<|
|00001c50| 20 f2 69 72 65 61 64 67 | 65 6e 28 77 68 61 6e 64 | .ireadg|en(whand|
|00001c60| 6c 65 33 25 2c 30 29 3a | 24 73 61 76 65 70 69 63 |le3%,0):|$savepic|
|00001c70| 25 3d 61 24 3a f2 73 61 | 76 65 70 69 63 28 24 73 |%=a$:.sa|vepic($s|
|00001c80| 61 76 65 70 69 63 25 29 | 0d 06 7c 1c 20 c8 99 22 |avepic%)|..|. .."|
|00001c90| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00001ca0| 2c 2c 2d 31 0d 06 86 04 | 0d 06 90 10 20 c9 20 77 |,,-1....|.... . w|
|00001cb0| 68 61 6e 64 6c 65 38 25 | 0d 06 9a 3f 20 f2 69 72 |handle8%|...? .ir|
|00001cc0| 65 61 64 67 65 6e 28 77 | 68 61 6e 64 6c 65 38 25 |eadgen(w|handle8%|
|00001cd0| 2c 30 29 3a 24 73 61 76 | 65 64 61 74 61 25 3d 61 |,0):$sav|edata%=a|
|00001ce0| 24 3a f2 73 61 76 65 64 | 61 74 61 28 24 73 61 76 |$:.saved|ata($sav|
|00001cf0| 65 64 61 74 61 25 29 0d | 06 a4 1c 20 c8 99 22 57 |edata%).|... .."W|
|00001d00| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00001d10| 2c 2d 31 0d 06 ae 04 0d | 06 b8 06 20 cb 0d 06 c2 |,-1.....|... ....|
|00001d20| 06 20 e1 0d 06 cc 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|00001d30| 2d 2d 2d 0d 06 d6 0c 20 | dd f2 6d 6f 75 73 65 0d |---.... |..mouse.|
|00001d40| 06 e0 2d 20 78 25 3d 21 | 62 6c 6f 63 6b 25 3a 79 |..- x%=!|block%:y|
|00001d50| 25 3d 62 6c 6f 63 6b 25 | 21 34 3a e7 20 62 6c 6f |%=block%|!4:. blo|
|00001d60| 63 6b 25 21 31 32 3c 3e | 2d 32 20 e1 0d 06 ea 40 |ck%!12<>|-2 ....@|
|00001d70| 20 e7 20 62 6c 6f 63 6b | 25 21 38 20 80 20 32 20 | . block|%!8 . 2 |
|00001d80| 8c 20 f2 72 6d 28 22 4d | 45 4e 33 22 29 3a f2 64 |. .rm("M|EN3"):.d|
|00001d90| 72 61 77 6d 65 6e 75 28 | 6d 65 6e 75 25 2c 74 65 |rawmenu(|menu%,te|
|00001da0| 78 74 24 2c 78 25 2c 79 | 25 2c b9 29 0d 06 f4 1c |xt$,x%,y|%,.)....|
|00001db0| 20 e7 20 62 6c 6f 63 6b | 25 21 38 20 80 20 35 20 | . block|%!8 . 5 |
|00001dc0| 8c 20 65 6e 64 25 3d b9 | 0d 06 fe 06 20 e1 0d 07 |. end%=.|.... ...|
|00001dd0| 08 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 07 |.. .----|------..|
|00001de0| 12 10 20 dd f2 65 64 69 | 74 6d 6f 75 73 65 0d 07 |.. ..edi|tmouse..|
|00001df0| 1c 3b 20 78 70 6f 73 3d | 21 62 6c 6f 63 6b 25 3a |.; xpos=|!block%:|
|00001e00| 79 70 6f 73 3d 62 6c 6f | 63 6b 25 21 34 3a 77 69 |ypos=blo|ck%!4:wi|
|00001e10| 6e 25 3d 62 6c 6f 63 6b | 25 21 31 32 3a 69 63 3d |n%=block|%!12:ic=|
|00001e20| 62 6c 6f 63 6b 25 21 31 | 36 0d 07 26 5c 20 e7 20 |block%!1|6..&\ . |
|00001e30| 62 6c 6f 63 6b 25 21 38 | 3d 32 20 80 20 62 6c 6f |block%!8|=2 . blo|
|00001e40| 63 6b 25 21 31 32 3d 2d | 32 20 f2 72 6d 28 22 4d |ck%!12=-|2 .rm("M|
|00001e50| 45 4e 33 22 29 3a f2 64 | 72 61 77 6d 65 6e 75 28 |EN3"):.d|rawmenu(|
|00001e60| 6d 65 6e 75 25 2c 74 65 | 78 74 24 2c 78 70 6f 73 |menu%,te|xt$,xpos|
|00001e70| 2c 79 70 6f 73 2c b9 29 | 3a 4d 55 24 3d 22 69 63 |,ypos,.)|:MU$="ic|
|00001e80| 6f 6e 22 3a e1 0d 07 30 | 47 20 e7 20 62 6c 6f 63 |on":...0|G . bloc|
|00001e90| 6b 25 21 38 3d 32 20 80 | 20 77 69 6e 25 3d 77 68 |k%!8=2 .| win%=wh|
|00001ea0| 61 6e 64 6c 65 31 25 20 | f2 64 72 61 77 6d 61 69 |andle1% |.drawmai|
|00001eb0| 6e 3a f2 75 70 64 61 74 | 65 73 74 61 74 75 73 3a |n:.updat|estatus:|
|00001ec0| 4d 55 24 3d 22 6d 65 6e | 75 22 3a e1 0d 07 44 0e |MU$="men|u":...D.|
|00001ed0| 20 c8 8e 20 77 69 6e 25 | 20 ca 0d 07 4e 04 0d 07 | .. win%| ...N...|
|00001ee0| 58 10 20 c9 20 77 68 61 | 6e 64 6c 65 31 25 0d 07 |X. . wha|ndle1%..|
|00001ef0| 62 1b 20 20 e7 20 69 63 | 3e 2d 31 20 f2 74 62 61 |b. . ic|>-1 .tba|
|00001f00| 72 5f 63 6c 69 63 6b 3a | e1 0d 07 6c 25 20 20 e7 |r_click:|...l% .|
|00001f10| 20 62 6c 6f 63 6b 25 21 | 38 3d 31 20 8c 20 f2 63 | block%!|8=1 . .c|
|00001f20| 61 6c 63 5f 6c 6f 63 61 | 74 69 6f 6e 3a e1 0d 07 |alc_loca|tion:...|
|00001f30| 6e 26 20 20 e7 20 62 6c | 6f 63 6b 25 21 38 3d 34 |n& . bl|ock%!8=4|
|00001f40| 20 8c 20 f2 63 61 6c 63 | 5f 6c 6f 63 61 74 69 6f | . .calc|_locatio|
|00001f50| 6e 32 3a e1 0d 07 76 04 | 0d 07 80 10 20 c9 20 77 |n2:...v.|.... . w|
|00001f60| 68 61 6e 64 6c 65 35 25 | 0d 07 8a 13 20 e7 20 62 |handle5%|.... . b|
|00001f70| 6c 6f 63 6b 25 21 38 3d | 32 20 e1 0d 07 94 0e 20 |lock%!8=|2 ..... |
|00001f80| e7 20 69 63 3d 31 37 20 | 8c 0d 07 9e 1e 20 20 f2 |. ic=17 |..... .|
|00001f90| 6f 6b 5f 63 6c 69 63 6b | 65 64 28 30 2c 77 68 61 |ok_click|ed(0,wha|
|00001fa0| 6e 64 6c 65 35 25 29 0d | 07 a8 2b 20 20 e3 20 46 |ndle5%).|..+ . F|
|00001fb0| 25 3d 31 20 b8 20 31 35 | 3a 50 72 6f 31 24 28 46 |%=1 . 15|:Pro1$(F|
|00001fc0| 25 2c 70 72 6f 63 5f 70 | 6f 69 6e 74 29 3d 22 22 |%,proc_p|oint)=""|
|00001fd0| 3a ed 0d 07 b2 11 20 20 | e3 20 46 25 3d 31 20 b8 |:..... |. F%=1 .|
|00001fe0| 20 31 35 0d 07 bc 36 20 | 20 20 f2 69 72 65 61 64 | 15...6 | .iread|
|00001ff0| 67 65 6e 28 77 68 61 6e | 64 6c 65 35 25 2c 46 25 |gen(whan|dle5%,F%|
|00002000| 29 3a 50 72 6f 31 24 28 | 46 25 2c 70 72 6f 63 5f |):Pro1$(|F%,proc_|
|00002010| 70 6f 69 6e 74 29 3d 61 | 24 0d 07 c6 20 20 20 20 |point)=a|$... |
|00002020| f2 69 73 65 74 67 65 6e | 28 77 68 61 6e 64 6c 65 |.isetgen|(whandle|
|00002030| 35 25 2c 46 25 2c 22 22 | 29 0d 07 d0 07 20 20 ed |5%,F%,""|).... .|
|00002040| 0d 07 da 25 20 20 e3 20 | 46 25 3d 31 20 b8 20 35 |...% . |F%=1 . 5|
|00002050| 30 3a 52 65 70 65 61 74 | 70 61 64 24 28 46 25 29 |0:Repeat|pad$(F%)|
|00002060| 3d 22 22 3a ed 0d 07 e4 | 37 20 20 e3 20 46 25 3d |="":....|7 . F%=|
|00002070| 31 20 b8 20 31 35 3a 52 | 65 70 65 61 74 70 61 64 |1 . 15:R|epeatpad|
|00002080| 24 28 46 25 29 3d 50 72 | 6f 31 24 28 46 25 2c 70 |$(F%)=Pr|o1$(F%,p|
|00002090| 72 6f 63 5f 70 6f 69 6e | 74 29 3a ed 0d 07 ee 10 |roc_poin|t):.....|
|000020a0| 20 20 f2 6c 6f 6f 6b 6d | 75 6c 74 69 0d 07 f8 3b | .lookm|ulti...;|
|000020b0| 20 20 e3 20 46 25 3d 31 | 20 b8 20 35 30 3a 56 69 | . F%=1| . 50:Vi|
|000020c0| 72 5f 50 72 6f 31 24 28 | 46 25 2c 70 72 6f 63 5f |r_Pro1$(|F%,proc_|
|000020d0| 70 6f 69 6e 74 29 3d 52 | 65 70 65 61 74 70 61 64 |point)=R|epeatpad|
|000020e0| 24 28 46 25 29 3a ed 0d | 08 02 2b 20 20 f2 73 65 |$(F%):..|..+ .se|
|000020f0| 74 75 70 5f 56 69 72 70 | 72 6f 31 28 70 72 6f 63 |tup_Virp|ro1(proc|
|00002100| 5f 70 6f 69 6e 74 29 3a | f2 6d 69 6e 69 5f 70 6f |_point):|.mini_po|
|00002110| 6c 6c 0d 08 0c 36 20 20 | 62 6c 6f 63 6b 25 21 30 |ll...6 |block%!0|
|00002120| 3d 77 68 61 6e 64 6c 65 | 35 25 3a c8 99 20 22 57 |=whandle|5%:.. "W|
|00002130| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00002140| 2c 2c 62 6c 6f 63 6b 25 | 0d 08 16 34 20 20 c8 99 |,,block%|...4 ..|
|00002150| 22 57 69 6d 70 5f 53 65 | 74 43 61 72 65 74 50 6f |"Wimp_Se|tCaretPo|
|00002160| 73 69 74 69 6f 6e 22 2c | 77 68 61 6e 64 6c 65 31 |sition",|whandle1|
|00002170| 25 2c 30 2c 30 2c 2c 2d | 31 2c 2d 31 0d 08 20 07 |%,0,0,,-|1,-1.. .|
|00002180| 20 20 e1 0d 08 2a 06 20 | cd 0d 08 34 04 0d 08 3e | ...*. |...4...>|
|00002190| 0e 20 e7 20 69 63 3d 31 | 38 20 8c 0d 08 48 28 20 |. . ic=1|8 ...H( |
|000021a0| 20 e7 20 69 63 3d 31 38 | 20 f2 63 61 6e 5f 63 6c | . ic=18| .can_cl|
|000021b0| 69 63 6b 65 64 28 31 36 | 2c 77 68 61 6e 64 6c 65 |icked(16|,whandle|
|000021c0| 35 25 29 0d 08 52 2d 20 | 20 e3 20 46 25 3d 31 20 |5%)..R- | . F%=1 |
|000021d0| b8 20 31 34 3a f2 69 73 | 65 74 67 65 6e 28 77 68 |. 14:.is|etgen(wh|
|000021e0| 61 6e 64 6c 65 35 25 2c | 46 25 2c 22 22 29 3a ed |andle5%,|F%,""):.|
|000021f0| 0d 08 5c 35 20 20 62 6c | 6f 63 6b 25 21 30 3d 77 |..\5 bl|ock%!0=w|
|00002200| 68 61 6e 64 6c 65 35 25 | 3a c8 99 22 57 69 6d 70 |handle5%|:.."Wimp|
|00002210| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|00002220| 6c 6f 63 6b 25 0d 08 66 | 34 20 20 c8 99 22 57 69 |lock%..f|4 .."Wi|
|00002230| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00002240| 69 6f 6e 22 2c 77 68 61 | 6e 64 6c 65 31 25 2c 30 |ion",wha|ndle1%,0|
|00002250| 2c 30 2c 2c 2d 31 2c 2d | 31 0d 08 70 06 20 cd 0d |,0,,-1,-|1..p. ..|
|00002260| 08 7a 04 0d 08 84 1e 20 | c9 20 77 68 61 6e 64 6c |.z..... |. whandl|
|00002270| 65 38 25 3a f4 20 28 73 | 61 76 65 20 64 61 74 61 |e8%:. (s|ave data|
|00002280| 29 0d 08 8e 46 20 e7 20 | 62 6c 6f 63 6b 25 21 31 |)...F . |block%!1|
|00002290| 36 3d 32 20 80 20 28 62 | 6c 6f 63 6b 25 21 38 20 |6=2 . (b|lock%!8 |
|000022a0| 80 20 26 35 30 29 3e 30 | 20 f2 64 72 61 67 6f 75 |. &50)>0| .dragou|
|000022b0| 74 6c 69 6e 65 28 77 68 | 61 6e 64 6c 65 38 25 29 |tline(wh|andle8%)|
|000022c0| 3a 6f 75 74 25 3d 38 0d | 08 98 0d 20 e7 20 69 63 |:out%=8.|... . ic|
|000022d0| 3d 31 20 8c 0d 08 a2 68 | 20 e7 20 62 6c 6f 63 6b |=1 ....h| . block|
|000022e0| 25 21 38 20 80 20 35 20 | 8c 20 f2 69 72 65 61 64 |%!8 . 5 |. .iread|
|000022f0| 67 65 6e 28 77 68 61 6e | 64 6c 65 38 25 2c 30 29 |gen(whan|dle8%,0)|
|00002300| 3a 24 73 61 76 65 64 61 | 74 61 25 3d 61 24 3a f2 |:$saveda|ta%=a$:.|
|00002310| 73 61 76 65 64 61 74 61 | 28 24 73 61 76 65 64 61 |savedata|($saveda|
|00002320| 74 61 25 29 3a c8 99 22 | 57 69 6d 70 5f 43 72 65 |ta%):.."|Wimp_Cre|
|00002330| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 08 ac 06 |ateMenu"|,,-1....|
|00002340| 20 cd 0d 08 b6 04 0d 08 | c0 20 20 c9 20 77 68 61 | .......|. . wha|
|00002350| 6e 64 6c 65 33 25 3a f4 | 20 28 73 61 76 65 20 73 |ndle3%:.| (save s|
|00002360| 63 72 65 65 6e 29 0d 08 | ca 46 20 e7 20 62 6c 6f |creen)..|.F . blo|
|00002370| 63 6b 25 21 31 36 3d 32 | 20 80 20 28 62 6c 6f 63 |ck%!16=2| . (bloc|
|00002380| 6b 25 21 38 20 80 20 26 | 35 30 29 3e 30 20 f2 64 |k%!8 . &|50)>0 .d|
|00002390| 72 61 67 6f 75 74 6c 69 | 6e 65 28 77 68 61 6e 64 |ragoutli|ne(whand|
|000023a0| 6c 65 33 25 29 3a 6f 75 | 74 25 3d 33 0d 08 d4 0d |le3%):ou|t%=3....|
|000023b0| 20 e7 20 69 63 3d 31 20 | 8c 0d 08 de 68 20 20 e7 | . ic=1 |....h .|
|000023c0| 20 62 6c 6f 63 6b 25 21 | 38 20 80 20 35 20 8c 20 | block%!|8 . 5 . |
|000023d0| f2 69 72 65 61 64 67 65 | 6e 28 77 68 61 6e 64 6c |.ireadge|n(whandl|
|000023e0| 65 33 25 2c 30 29 3a 24 | 73 61 76 65 64 61 74 61 |e3%,0):$|savedata|
|000023f0| 25 3d 61 24 3a f2 73 61 | 76 65 70 69 63 28 24 73 |%=a$:.sa|vepic($s|
|00002400| 61 76 65 64 61 74 61 25 | 29 3a c8 99 22 57 69 6d |avedata%|):.."Wim|
|00002410| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 2d |p_Create|Menu",,-|
|00002420| 31 0d 08 e8 06 20 cd 0d | 08 f2 04 0d 08 fc 04 0d |1.... ..|........|
|00002430| 09 06 19 20 c9 20 77 68 | 61 6e 64 6c 65 37 25 3a |... . wh|andle7%:|
|00002440| f4 20 28 68 65 6c 70 29 | 0d 09 10 0d 20 e7 20 69 |. (help)|.... . i|
|00002450| 63 3d 32 20 8c 0d 09 1a | 1f 20 20 f2 63 61 6e 5f |c=2 ....|. .can_|
|00002460| 63 6c 69 63 6b 65 64 28 | 30 2c 77 68 61 6e 64 6c |clicked(|0,whandl|
|00002470| 65 37 25 29 0d 09 24 38 | 20 20 e7 20 68 65 6c 70 |e7%)..$8| . help|
|00002480| 5f 70 61 67 65 3d 31 20 | 68 65 6c 70 5f 70 61 67 |_page=1 |help_pag|
|00002490| 65 3d 33 34 20 8b 20 68 | 65 6c 70 5f 70 61 67 65 |e=34 . h|elp_page|
|000024a0| 3d 68 65 6c 70 5f 70 61 | 67 65 2d 31 0d 09 2e 06 |=help_pa|ge-1....|
|000024b0| 20 cd 0d 09 38 04 0d 09 | 42 0d 20 e7 20 69 63 3d | ...8...|B. . ic=|
|000024c0| 33 20 8c 0d 09 4c 1f 20 | 20 f2 63 61 6e 5f 63 6c |3 ...L. | .can_cl|
|000024d0| 69 63 6b 65 64 28 31 2c | 77 68 61 6e 64 6c 65 37 |icked(1,|whandle7|
|000024e0| 25 29 0d 09 56 2f 20 20 | e7 20 68 65 6c 70 5f 70 |%)..V/ |. help_p|
|000024f0| 61 67 65 3d 33 34 20 68 | 65 6c 70 5f 70 61 67 65 |age=34 h|elp_page|
|00002500| 3d 31 20 8b 20 68 65 6c | 70 5f 70 61 67 65 2b 3d |=1 . hel|p_page+=|
|00002510| 31 0d 09 60 06 20 cd 0d | 09 6a 04 0d 09 74 18 20 |1..`. ..|.j...t. |
|00002520| e7 20 69 63 3d 34 33 20 | 68 65 6c 70 5f 70 61 67 |. ic=43 |help_pag|
|00002530| 65 3d 31 0d 09 7e 2e 20 | e7 20 69 63 3e 33 20 80 |e=1..~. |. ic>3 .|
|00002540| 20 69 63 3c 33 35 20 80 | 20 68 65 6c 70 5f 70 61 | ic<35 .| help_pa|
|00002550| 67 65 3d 31 20 68 65 6c | 70 5f 70 61 67 65 3d 69 |ge=1 hel|p_page=i|
|00002560| 63 0d 09 88 30 20 c8 99 | 22 57 69 6d 70 5f 46 6f |c...0 ..|"Wimp_Fo|
|00002570| 72 63 65 52 65 64 72 61 | 77 22 2c 77 68 61 6e 64 |rceRedra|w",whand|
|00002580| 6c 65 37 25 2c 30 2c 2d | 36 39 32 2c 36 30 30 2c |le7%,0,-|692,600,|
|00002590| 30 0d 09 89 35 20 c8 99 | 22 57 69 6d 70 5f 46 6f |0...5 ..|"Wimp_Fo|
|000025a0| 72 63 65 52 65 64 72 61 | 77 22 2c 77 68 61 6e 64 |rceRedra|w",whand|
|000025b0| 6c 65 37 25 2c 32 33 30 | 2c 2d 37 37 30 2c 33 32 |le7%,230|,-770,32|
|000025c0| 30 2c 2d 37 30 30 0d 09 | 92 04 0d 09 9c 1b 20 c9 |0,-700..|...... .|
|000025d0| 20 77 68 61 6e 64 6c 65 | 34 25 3a f4 20 28 52 65 | whandle|4%:. (Re|
|000025e0| 70 65 61 74 29 0d 09 a6 | 15 20 e7 20 62 6c 6f 63 |peat)...|. . bloc|
|000025f0| 6b 25 21 31 36 3d 31 37 | 20 8c 0d 09 b0 1e 20 20 |k%!16=17| ..... |
|00002600| f2 6f 6b 5f 63 6c 69 63 | 6b 65 64 28 30 2c 77 68 |.ok_clic|ked(0,wh|
|00002610| 61 6e 64 6c 65 34 25 29 | 0d 09 ba 3d 20 20 e3 20 |andle4%)|...= . |
|00002620| 46 25 3d 31 20 b8 20 35 | 30 3a 52 65 70 65 61 74 |F%=1 . 5|0:Repeat|
|00002630| 70 61 64 24 28 46 25 29 | 3d 22 22 3a ed 3a 52 65 |pad$(F%)|="":.:Re|
|00002640| 70 65 61 74 70 61 64 24 | 28 31 29 3d 22 44 65 66 |peatpad$|(1)="Def|
|00002650| 61 75 6c 74 22 0d 09 c4 | 3f 20 20 e3 20 46 25 3d |ault"...|? . F%=|
|00002660| 31 20 b8 20 31 35 3a f2 | 69 72 65 61 64 67 65 6e |1 . 15:.|ireadgen|
|00002670| 28 77 68 61 6e 64 6c 65 | 34 25 2c 46 25 29 3a 52 |(whandle|4%,F%):R|
|00002680| 65 70 65 61 74 70 61 64 | 24 28 46 25 2b 31 29 3d |epeatpad|$(F%+1)=|
|00002690| 61 24 3a ed 0d 09 ce 19 | 20 20 f2 6c 6f 6f 6b 6d |a$:.....| .lookm|
|000026a0| 75 6c 74 69 3a 66 6c 61 | 67 67 25 3d 31 0d 09 d8 |ulti:fla|gg%=1...|
|000026b0| 32 20 20 e3 20 46 25 3d | 31 20 b8 20 35 30 3a 56 |2 . F%=|1 . 50:V|
|000026c0| 69 72 5f 50 72 6f 31 24 | 28 46 25 2c 30 29 3d 52 |ir_Pro1$|(F%,0)=R|
|000026d0| 65 70 65 61 74 70 61 64 | 24 28 46 25 29 3a ed 0d |epeatpad|$(F%):..|
|000026e0| 09 e2 20 20 20 f2 73 65 | 74 75 70 5f 56 69 72 70 |.. .se|tup_Virp|
|000026f0| 72 6f 31 28 30 29 3a 66 | 6c 61 67 67 25 3d b9 0d |ro1(0):f|lagg%=..|
|00002700| 09 ec 06 20 cd 0d 09 f6 | 16 20 e7 20 69 63 3d 31 |... ....|. . ic=1|
|00002710| 37 20 84 20 69 63 3d 31 | 38 20 8c 0d 0a 00 28 20 |7 . ic=1|8 ....( |
|00002720| 20 e7 20 69 63 3d 31 38 | 20 f2 63 61 6e 5f 63 6c | . ic=18| .can_cl|
|00002730| 69 63 6b 65 64 28 31 36 | 2c 77 68 61 6e 64 6c 65 |icked(16|,whandle|
|00002740| 34 25 29 0d 0a 0a 40 20 | 20 62 6c 6f 63 6b 25 21 |4%)...@ | block%!|
|00002750| 30 3d 77 68 61 6e 64 6c | 65 34 25 3a c8 99 22 57 |0=whandl|e4%:.."W|
|00002760| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00002770| 2c 2c 62 6c 6f 63 6b 25 | 3a f2 6d 69 6e 69 5f 70 |,,block%|:.mini_p|
|00002780| 6f 6c 6c 0d 0a 14 2d 20 | 20 e3 20 46 25 3d 31 20 |oll...- | . F%=1 |
|00002790| b8 20 31 35 3a f2 69 73 | 65 74 67 65 6e 28 77 68 |. 15:.is|etgen(wh|
|000027a0| 61 6e 64 6c 65 34 25 2c | 46 25 2c 22 22 29 3a ed |andle4%,|F%,""):.|
|000027b0| 0d 0a 1e 34 20 20 c8 99 | 22 57 69 6d 70 5f 53 65 |...4 ..|"Wimp_Se|
|000027c0| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|000027d0| 77 68 61 6e 64 6c 65 31 | 25 2c 30 2c 30 2c 2c 2d |whandle1|%,0,0,,-|
|000027e0| 31 2c 2d 31 0d 0a 28 06 | 20 cd 0d 0a 32 04 0d 0a |1,-1..(.| ...2...|
|000027f0| 3c 0b 20 f4 20 2a 2a 2a | 2a 0d 0a 46 22 20 c9 20 |<. . ***|*..F" . |
|00002800| 77 68 61 6e 64 6c 65 31 | 34 25 3a f4 20 70 72 69 |whandle1|4%:. pri|
|00002810| 6e 74 20 64 69 61 6c 6f | 67 75 65 0d 0a 50 52 20 |nt dialo|gue..PR |
|00002820| e7 20 69 63 3d 33 20 f2 | 70 72 69 6e 74 63 74 72 |. ic=3 .|printctr|
|00002830| 6c 3a 62 6c 6f 63 6b 25 | 21 30 3d 77 68 61 6e 64 |l:block%|!0=whand|
|00002840| 6c 65 31 34 25 3a c8 99 | 22 57 69 6d 70 5f 43 6c |le14%:..|"Wimp_Cl|
|00002850| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00002860| 6b 25 3a f2 6d 69 6e 69 | 5f 70 6f 6c 6c 0d 0a 5a |k%:.mini|_poll..Z|
|00002870| 3c 20 e7 20 69 63 3d 34 | 20 62 6c 6f 63 6b 25 21 |< . ic=4| block%!|
|00002880| 30 3d 77 68 61 6e 64 6c | 65 31 34 25 3a c8 99 22 |0=whandl|e14%:.."|
|00002890| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|000028a0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 0a 64 25 20 e7 20 |",,block|%..d% . |
|000028b0| 69 63 3d 35 20 70 72 69 | 6e 74 5f 70 61 75 73 65 |ic=5 pri|nt_pause|
|000028c0| 3d ac 20 70 72 69 6e 74 | 5f 70 61 75 73 65 0d 0a |=. print|_pause..|
|000028d0| 6e 04 0d 0a 78 06 20 cb | 0d 0a 82 06 20 e1 0d 0a |n...x. .|.... ...|
|000028e0| 8c 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0a |.. .----|------..|
|000028f0| 96 15 20 dd f2 76 65 72 | 69 66 79 73 68 75 74 64 |.. ..ver|ifyshutd|
|00002900| 6f 77 6e 0d 0a a0 2f 20 | 21 62 6c 6f 63 6b 25 3d |own.../ |!block%=|
|00002910| 30 3a f2 72 6d 28 22 57 | 41 52 31 22 29 3a 24 28 |0:.rm("W|AR1"):$(|
|00002920| 62 6c 6f 63 6b 25 2b 34 | 29 3d 74 65 78 74 24 2b |block%+4|)=text$+|
|00002930| bd 30 0d 0a aa 37 20 c8 | 99 22 57 69 6d 70 5f 52 |.0...7 .|."Wimp_R|
|00002940| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 62 6c 6f 63 |eportErr|or",bloc|
|00002950| 6b 25 2c 31 39 2c 22 57 | 61 72 6e 69 6e 67 22 20 |k%,19,"W|arning" |
|00002960| b8 20 2c 73 65 6c 65 63 | 74 0d 0a b4 11 20 e7 20 |. ,selec|t.... . |
|00002970| 73 65 6c 65 63 74 3d 32 | 20 e1 0d 0a be 0e 20 71 |select=2| ..... q|
|00002980| 75 69 74 25 3d b9 3a e1 | 0d 0a c8 10 20 f4 2d 2d |uit%=.:.|.... .--|
|00002990| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 0a d2 13 20 dd f2 6f |--------|.... ..o|
|000029a0| 70 74 69 6f 6e 73 65 6c | 65 63 74 0d 0a dc 34 20 |ptionsel|ect...4 |
|000029b0| 63 68 6f 69 63 65 25 3d | 21 62 6c 6f 63 6b 25 3a |choice%=|!block%:|
|000029c0| 63 68 6f 69 63 65 32 25 | 3d 62 6c 6f 63 6b 25 21 |choice2%|=block%!|
|000029d0| 34 3a 63 72 65 61 74 65 | 5f 6d 65 6e 75 3d 30 0d |4:create|_menu=0.|
|000029e0| 0a e6 3f 20 c8 99 22 57 | 69 6d 70 5f 47 65 74 50 |..? .."W|imp_GetP|
|000029f0| 6f 69 6e 74 65 72 49 6e | 66 6f 22 2c 2c 62 6c 6f |ointerIn|fo",,blo|
|00002a00| 63 6b 25 3a e7 20 62 6c | 6f 63 6b 25 21 38 3d 31 |ck%:. bl|ock%!8=1|
|00002a10| 20 63 72 65 61 74 65 5f | 6d 65 6e 75 3d 31 0d 0a | create_|menu=1..|
|00002a20| fa 13 20 e7 20 4d 55 24 | 3d 22 69 63 6f 6e 22 20 |.. . MU$|="icon" |
|00002a30| 8c 0d 0b 04 21 20 20 e7 | 20 63 68 6f 69 63 65 25 |....! .| choice%|
|00002a40| 3d 31 20 f2 76 65 72 69 | 66 79 73 68 75 74 64 6f |=1 .veri|fyshutdo|
|00002a50| 77 6e 0d 0b 0e 06 20 cd | 0d 0b 22 13 20 e7 20 4d |wn.... .|..". . M|
|00002a60| 55 24 3d 22 73 70 72 73 | 22 20 8c 0d 0b 2c 26 20 |U$="sprs|" ...,& |
|00002a70| 20 43 43 24 3d 73 70 72 | 73 24 28 31 2b 63 68 6f | CC$=spr|s$(1+cho|
|00002a80| 69 63 65 25 29 3a f2 6c | 6f 61 64 73 70 72 69 74 |ice%):.l|oadsprit|
|00002a90| 65 0d 0b 36 41 20 20 e7 | 20 63 72 65 61 74 65 5f |e..6A .| create_|
|00002aa0| 6d 65 6e 75 3d 31 20 c8 | 99 22 57 69 6d 70 5f 43 |menu=1 .|."Wimp_C|
|00002ab0| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 73 70 72 73 |reateMen|u",,sprs|
|00002ac0| 6d 65 6e 75 25 2c 78 70 | 6f 73 2d 36 34 2c 79 70 |menu%,xp|os-64,yp|
|00002ad0| 6f 73 0d 0b 40 06 20 cd | 0d 0b 54 13 20 e7 20 4d |os..@. .|..T. . M|
|00002ae0| 55 24 3d 22 6d 65 6e 75 | 22 20 8c 0d 0b 5e 3c 20 |U$="menu|" ...^< |
|00002af0| 20 e7 20 63 68 6f 69 63 | 65 25 3d 31 20 70 6d 6f | . choic|e%=1 pmo|
|00002b00| 72 65 25 3d 30 3a c8 99 | 22 57 69 6d 70 5f 43 72 |re%=0:..|"Wimp_Cr|
|00002b10| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 2d 31 3a f2 70 |eateMenu|",,-1:.p|
|00002b20| 72 69 6e 74 5f 69 74 0d | 0b 72 22 20 20 e7 20 63 |rint_it.|.r" . c|
|00002b30| 68 6f 69 63 65 25 3d 32 | 20 80 20 50 72 6f 63 6e |hoice%=2| . Procn|
|00002b40| 61 6d 65 73 25 3e 30 20 | 8c 0d 0b 7c 18 20 20 20 |ames%>0 |...|. |
|00002b50| e7 20 50 72 6f 31 24 28 | 31 2c 31 29 3d 22 22 20 |. Pro1$(|1,1)="" |
|00002b60| e1 0d 0b 86 1d 20 20 20 | f2 6f 70 65 6e 77 69 6e |..... |.openwin|
|00002b70| 64 6f 77 28 77 68 61 6e | 64 6c 65 35 25 29 0d 0b |dow(whan|dle5%)..|
|00002b80| 90 35 20 20 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |.5 .."|Wimp_Set|
|00002b90| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 77 |CaretPos|ition",w|
|00002ba0| 68 61 6e 64 6c 65 35 25 | 2c 32 2c 30 2c 2c 2d 31 |handle5%|,2,0,,-1|
|00002bb0| 2c 2d 31 0d 0b 9a 13 20 | 20 20 e3 20 6f 77 25 3d |,-1.... | . ow%=|
|00002bc0| 31 20 b8 20 31 35 0d 0b | a4 38 20 20 20 f2 69 73 |1 . 15..|.8 .is|
|00002bd0| 65 74 67 65 6e 28 77 68 | 61 6e 64 6c 65 35 25 2c |etgen(wh|andle5%,|
|00002be0| 6f 77 25 2c 50 72 6f 31 | 24 28 6f 77 25 2c 28 63 |ow%,Pro1|$(ow%,(c|
|00002bf0| 68 6f 69 63 65 32 25 2b | 31 29 29 29 3a ed 0d 0b |hoice2%+|1))):...|
|00002c00| ae 1c 20 20 20 70 72 6f | 63 5f 70 6f 69 6e 74 3d |.. pro|c_point=|
|00002c10| 63 68 6f 69 63 65 32 25 | 2b 31 0d 0b b8 1e 20 20 |choice2%|+1.... |
|00002c20| 20 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d | .."Wimp|_CreateM|
|00002c30| 65 6e 75 22 2c 2c 2d 31 | 0d 0b c2 07 20 20 cd 0d |enu",,-1|.... ..|
|00002c40| 0b d6 1c 20 20 e7 20 63 | 68 6f 69 63 65 25 3d 33 |... . c|hoice%=3|
|00002c50| 20 f2 65 72 61 73 65 70 | 72 6f 63 0d 0b e0 63 20 | .erasep|roc...c |
|00002c60| 20 e7 20 63 68 6f 69 63 | 65 25 3d 34 20 80 20 63 | . choic|e%=4 . c|
|00002c70| 68 6f 69 63 65 32 25 3c | 3e 2d 31 20 70 6d 6f 72 |hoice2%<|>-1 pmor|
|00002c80| 65 25 3d 32 3a 70 6d 6f | 72 65 5f 6e 75 6d 62 65 |e%=2:pmo|re_numbe|
|00002c90| 72 3d 63 68 6f 69 63 65 | 32 25 2b 31 3a c8 99 22 |r=choice|2%+1:.."|
|00002ca0| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00002cb0| 2c 2c 2d 31 3a f2 70 72 | 69 6e 74 5f 69 74 0d 0b |,,-1:.pr|int_it..|
|00002cc0| ea 63 20 20 e7 20 63 68 | 6f 69 63 65 25 3d 35 20 |.c . ch|oice%=5 |
|00002cd0| 80 20 50 72 6f 63 6e 61 | 6d 65 73 25 3e 30 20 70 |. Procna|mes%>0 p|
|00002ce0| 6d 6f 72 65 25 3d 33 3a | 70 6d 6f 72 65 5f 6e 75 |more%=3:|pmore_nu|
|00002cf0| 6d 62 65 72 3d 63 68 6f | 69 63 65 32 25 2b 31 3a |mber=cho|ice2%+1:|
|00002d00| c8 99 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |.."Wimp_|CreateMe|
|00002d10| 6e 75 22 2c 2c 2d 31 3a | f2 70 72 69 6e 74 5f 69 |nu",,-1:|.print_i|
|00002d20| 74 0d 0b f4 48 20 20 e7 | 20 63 68 6f 69 63 65 25 |t...H .| choice%|
|00002d30| 3d 36 20 80 20 63 68 6f | 69 63 65 32 25 3c 3e 2d |=6 . cho|ice2%<>-|
|00002d40| 31 20 80 20 50 72 6f 31 | 24 28 31 2c 31 29 3c 3e |1 . Pro1|$(1,1)<>|
|00002d50| 22 22 20 f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 77 |"" .open|window(w|
|00002d60| 68 61 6e 64 6c 65 38 25 | 29 0d 0b fe 1b 20 20 e7 |handle8%|).... .|
|00002d70| 20 63 68 6f 69 63 65 25 | 3d 38 20 f2 65 72 61 73 | choice%|=8 .eras|
|00002d80| 65 76 61 72 0d 0c 08 14 | 20 20 e7 20 63 68 6f 69 |evar....| . choi|
|00002d90| 63 65 25 3d 31 32 20 8c | 0d 0c 12 36 20 20 20 62 |ce%=12 .|...6 b|
|00002da0| 6c 6f 63 6b 25 21 30 3d | 77 68 61 6e 64 6c 65 37 |lock%!0=|whandle7|
|00002db0| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|00002dc0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 0c |indow",,|block%..|
|00002dd0| 1c 29 20 20 20 68 65 6c | 70 5f 70 61 67 65 3d 31 |.) hel|p_page=1|
|00002de0| 3a f2 6f 70 65 6e 77 69 | 6e 64 6f 77 28 77 68 61 |:.openwi|ndow(wha|
|00002df0| 6e 64 6c 65 37 25 29 0d | 0c 26 07 20 20 cd 0d 0c |ndle7%).|.&. ...|
|00002e00| 3a 14 20 20 e7 20 63 68 | 6f 69 63 65 25 3d 31 31 |:. . ch|oice%=11|
|00002e10| 20 8c 0d 0c 44 17 20 20 | 20 e7 20 63 68 6f 69 63 | ...D. | . choic|
|00002e20| 65 32 25 3c 3e 2d 31 20 | 8c 0d 0c 4e 29 20 20 20 |e2%<>-1 |...N) |
|00002e30| 20 43 43 24 3d 73 70 72 | 73 24 28 31 2b 63 68 6f | CC$=spr|s$(1+cho|
|00002e40| 69 63 65 32 25 29 3a f2 | 6c 6f 61 64 73 70 72 69 |ice2%):.|loadspri|
|00002e50| 74 65 0d 0c 58 08 20 20 | 20 cd 0d 0c 62 07 20 20 |te..X. | ...b. |
|00002e60| cd 0d 0c 76 2f 20 20 e7 | 20 63 68 6f 69 63 65 25 |...v/ .| choice%|
|00002e70| 3d 31 34 20 80 20 63 68 | 6f 69 63 65 32 25 3c 3e |=14 . ch|oice2%<>|
|00002e80| 2d 31 20 f2 6c 6f 61 64 | 6e 65 77 73 6f 75 6e 64 |-1 .load|newsound|
|00002e90| 0d 0c 80 1e 20 e7 20 63 | 72 65 61 74 65 5f 6d 65 |.... . c|reate_me|
|00002ea0| 6e 75 3d 31 20 f2 64 72 | 61 77 6d 61 69 6e 0d 0c |nu=1 .dr|awmain..|
|00002eb0| 8a 06 20 cd 0d 0c 9e 06 | 20 e1 0d 0c a8 10 20 f4 |.. .....| ..... .|
|00002ec0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 0c b2 2c 20 dd |--------|--..., .|
|00002ed0| a4 54 65 6d 70 28 54 24 | 29 3a 24 69 64 65 6e 74 |.Temp(T$|):$ident|
|00002ee0| 25 3d 54 24 3a ea 20 68 | 25 3a 77 64 61 25 3d 77 |%=T$:. h|%:wda%=w|
|00002ef0| 64 61 74 61 31 25 0d 0c | c6 4a 20 c8 99 22 57 69 |data1%..|.J .."Wi|
|00002f00| 6d 70 5f 4c 6f 61 64 54 | 65 6d 70 6c 61 74 65 22 |mp_LoadT|emplate"|
|00002f10| 2c 2c 62 6c 6f 63 6b 25 | 2c 77 64 61 74 61 31 25 |,,block%|,wdata1%|
|00002f20| 2c 77 64 31 65 6e 64 25 | 2c 2d 31 2c 69 64 65 6e |,wd1end%|,-1,iden|
|00002f30| 74 25 2c 30 20 b8 20 2c | 2c 77 64 61 74 61 31 25 |t%,0 . ,|,wdata1%|
|00002f40| 0d 0c d0 18 20 62 6c 6f | 63 6b 25 21 36 34 3d 69 |.... blo|ck%!64=i|
|00002f50| 63 6f 6e 73 70 61 63 65 | 0d 0c da 26 20 e7 20 54 |conspace|...& . T|
|00002f60| 24 3d 22 44 69 73 70 6c | 61 79 22 20 f2 73 65 74 |$="Displ|ay" .set|
|00002f70| 5f 64 69 73 70 6c 61 79 | 5f 69 63 6f 6e 73 0d 0c |_display|_icons..|
|00002f80| e4 4d 20 e7 20 54 24 3d | 22 50 72 6f 63 22 20 62 |.M . T$=|"Proc" b|
|00002f90| 6c 6f 63 6b 25 21 28 38 | 38 2b 30 2a 33 32 2b 32 |lock%!(8|8+0*32+2|
|00002fa0| 34 29 3d 69 63 6f 6e 73 | 70 61 63 65 3a 62 6c 6f |4)=icons|pace:blo|
|00002fb0| 63 6b 25 21 28 38 38 2b | 31 36 2a 33 32 2b 32 34 |ck%!(88+|16*32+24|
|00002fc0| 29 3d 69 63 6f 6e 73 70 | 61 63 65 0d 0c ee 50 20 |)=iconsp|ace...P |
|00002fd0| e7 20 54 24 3d 22 50 61 | 64 6c 69 73 74 22 20 62 |. T$="Pa|dlist" b|
|00002fe0| 6c 6f 63 6b 25 21 28 38 | 38 2b 30 2a 33 32 2b 32 |lock%!(8|8+0*32+2|
|00002ff0| 34 29 3d 69 63 6f 6e 73 | 70 61 63 65 3a 62 6c 6f |4)=icons|pace:blo|
|00003000| 63 6b 25 21 28 38 38 2b | 31 36 2a 33 32 2b 32 34 |ck%!(88+|16*32+24|
|00003010| 29 3d 69 63 6f 6e 73 70 | 61 63 65 0d 0c f8 50 20 |)=iconsp|ace...P |
|00003020| e7 20 54 24 3d 22 48 65 | 6c 70 49 6e 66 6f 22 20 |. T$="He|lpInfo" |
|00003030| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 30 2a 33 32 2b |block%!(|88+0*32+|
|00003040| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 3a 62 6c |24)=icon|space:bl|
|00003050| 6f 63 6b 25 21 28 38 38 | 2b 31 2a 33 32 2b 32 34 |ock%!(88|+1*32+24|
|00003060| 29 3d 69 63 6f 6e 73 70 | 61 63 65 0d 0d 02 4d 20 |)=iconsp|ace...M |
|00003070| e7 20 54 24 3d 22 70 72 | 69 6e 74 22 20 62 6c 6f |. T$="pr|int" blo|
|00003080| 63 6b 25 21 28 38 38 2b | 32 2a 33 32 2b 32 34 29 |ck%!(88+|2*32+24)|
|00003090| 3d 69 63 6f 6e 73 70 61 | 63 65 3a 62 6c 6f 63 6b |=iconspa|ce:block|
|000030a0| 25 21 28 38 38 2b 31 2a | 33 32 2b 32 34 29 3d 69 |%!(88+1*|32+24)=i|
|000030b0| 63 6f 6e 73 70 61 63 65 | 0d 0d 0c 32 20 e7 20 54 |conspace|...2 . T|
|000030c0| 24 3d 22 65 72 72 6f 72 | 62 6f 78 22 20 62 6c 6f |$="error|box" blo|
|000030d0| 63 6b 25 21 28 38 38 2b | 31 2a 33 32 2b 32 34 29 |ck%!(88+|1*32+24)|
|000030e0| 3d 69 63 6f 6e 73 70 61 | 63 65 0d 0d 0e 2d 20 e7 |=iconspa|ce...- .|
|000030f0| 20 54 24 3d 22 72 65 67 | 22 20 62 6c 6f 63 6b 25 | T$="reg|" block%|
|00003100| 21 28 38 38 2b 34 2a 33 | 32 2b 32 34 29 3d 69 63 |!(88+4*3|2+24)=ic|
|00003110| 6f 6e 73 70 61 63 65 0d | 0d 16 27 20 c8 99 22 57 |onspace.|..' .."W|
|00003120| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00003130| 22 2c 2c 62 6c 6f 63 6b | 25 20 b8 20 68 25 0d 0d |",,block|% . h%..|
|00003140| 20 08 20 3d 68 25 0d 0d | 2a 10 20 f4 2d 2d 2d 2d | . =h%..|*. .----|
|00003150| 2d 2d 2d 2d 2d 2d 0d 0d | 34 1f 20 dd f2 73 65 74 |------..|4. ..set|
|00003160| 5f 64 69 73 70 6c 61 79 | 5f 69 63 6f 6e 73 3a f7 |_display|_icons:.|
|00003170| 20 8d 44 48 4d 0d 0d 48 | 54 20 dc 20 35 2c 37 2c | .DHM..H|T . 5,7,|
|00003180| 38 2c 31 30 2c 31 31 2c | 31 32 2c 31 33 2c 31 34 |8,10,11,|12,13,14|
|00003190| 2c 31 35 2c 31 36 2c 31 | 37 2c 31 38 2c 31 39 2c |,15,16,1|7,18,19,|
|000031a0| 32 30 2c 32 31 2c 32 32 | 2c 32 33 2c 32 34 2c 32 |20,21,22|,23,24,2|
|000031b0| 35 2c 32 36 2c 32 37 2c | 32 38 2c 32 39 2c 33 30 |5,26,27,|28,29,30|
|000031c0| 2c 33 32 2c 33 33 2c 2d | 31 0d 0d 52 06 20 f5 0d |,32,33,-|1..R. ..|
|000031d0| 0d 5c 2e 20 20 f3 20 41 | 3a e7 20 41 3e 2d 31 20 |.\. . A|:. A>-1 |
|000031e0| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 41 2a 33 32 2b |block%!(|88+A*32+|
|000031f0| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 0d 0d 66 |24)=icon|space..f|
|00003200| 22 20 fd 20 41 3d 2d 31 | 3a 62 6c 6f 63 6b 25 21 |" . A=-1|:block%!|
|00003210| 31 32 3d 73 63 72 65 65 | 6e 5f 74 6f 70 3a e1 0d |12=scree|n_top:..|
|00003220| 0d 70 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.p. .---|-------.|
|00003230| 0d 7a 16 20 dd f2 65 72 | 72 6f 72 3a 21 62 6c 6f |.z. ..er|ror:!blo|
|00003240| 63 6b 25 3d 9f 0d 0d 8e | 36 20 24 28 62 6c 6f 63 |ck%=....|6 $(bloc|
|00003250| 6b 25 2b 34 29 3d f6 24 | 2b 22 20 28 69 6e 74 65 |k%+4)=.$|+" (inte|
|00003260| 72 6e 61 6c 20 65 72 72 | 6f 72 20 63 6f 64 65 20 |rnal err|or code |
|00003270| 22 2b c3 9e 2b 22 29 22 | 2b bd 30 0d 0d 98 36 20 |"+..+")"|+.0...6 |
|00003280| f2 72 6d 28 22 45 52 52 | 31 22 29 3a c8 99 22 57 |.rm("ERR|1"):.."W|
|00003290| 69 6d 70 5f 52 65 70 6f | 72 74 45 72 72 6f 72 22 |imp_Repo|rtError"|
|000032a0| 2c 62 6c 6f 63 6b 25 2c | 31 2c 74 65 78 74 24 3a |,block%,|1,text$:|
|000032b0| e1 0d 0d a2 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|000032c0| 2d 0d 0d ac 36 20 dd a4 | 77 69 6d 70 65 72 72 6f |-...6 ..|wimperro|
|000032d0| 72 3a f2 64 72 61 77 74 | 75 72 74 6c 65 3a f2 67 |r:.drawt|urtle:.g|
|000032e0| 72 61 62 69 74 3a 61 62 | 6f 72 74 3d 31 3a 21 62 |rabit:ab|ort=1:!b|
|000032f0| 6c 6f 63 6b 25 3d 9f 0d | 0d c0 32 20 24 28 62 6c |lock%=..|..2 $(bl|
|00003300| 6f 63 6b 25 2b 34 29 3d | f6 24 2b 22 20 28 22 2b |ock%+4)=|.$+" ("+|
|00003310| c3 9f 2b 22 29 20 61 74 | 20 6c 69 6e 65 20 22 2b |..+") at| line "+|
|00003320| c3 9e 2b 22 20 22 2b bd | 30 0d 0d ca 34 20 f2 72 |..+" "+.|0...4 .r|
|00003330| 6d 28 22 45 52 52 31 22 | 29 3a c8 99 22 57 69 6d |m("ERR1"|):.."Wim|
|00003340| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 62 |p_Report|Error",b|
|00003350| 6c 6f 63 6b 25 2c 31 2c | 74 65 78 74 24 0d 0d d4 |lock%,1,|text$...|
|00003360| 97 20 62 6c 6f 63 6b 25 | 21 30 3d 77 68 61 6e 64 |. block%|!0=whand|
|00003370| 6c 65 33 25 3a c8 99 20 | 22 57 69 6d 70 5f 43 6c |le3%:.. |"Wimp_Cl|
|00003380| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00003390| 6b 25 3a 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |k%:block|%!0=whan|
|000033a0| 64 6c 65 32 25 3a c8 99 | 20 22 57 69 6d 70 5f 43 |dle2%:..| "Wimp_C|
|000033b0| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |loseWind|ow",,blo|
|000033c0| 63 6b 25 3a 62 6c 6f 63 | 6b 25 21 30 3d 77 68 61 |ck%:bloc|k%!0=wha|
|000033d0| 6e 64 6c 65 31 25 3a c8 | 99 20 22 57 69 6d 70 5f |ndle1%:.|. "Wimp_|
|000033e0| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|000033f0| 6f 63 6b 25 0d 0d de 07 | 20 3d b9 0d 0d e8 10 20 |ock%....| =..... |
|00003400| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0d f2 40 20 |.-------|---...@ |
|00003410| dd a4 69 63 6f 6e 64 65 | 66 28 77 68 61 6e 64 6c |..iconde|f(whandl|
|00003420| 65 25 2c 69 78 25 2c 69 | 79 25 2c 69 77 25 2c 69 |e%,ix%,i|y%,iw%,i|
|00003430| 68 25 2c 66 6c 61 67 25 | 2c 74 65 78 74 24 2c 64 |h%,flag%|,text$,d|
|00003440| 31 25 2c 64 32 25 2c 64 | 33 25 29 0d 0d fc 30 20 |1%,d2%,d|3%)...0 |
|00003450| 62 6c 6f 63 6b 25 21 30 | 3d 77 68 61 6e 64 6c 65 |block%!0|=whandle|
|00003460| 25 3a 62 6c 6f 63 6b 25 | 21 34 3d 69 78 25 3a 62 |%:block%|!4=ix%:b|
|00003470| 6c 6f 63 6b 25 21 38 3d | 69 79 25 0d 0e 06 38 20 |lock%!8=|iy%...8 |
|00003480| 62 6c 6f 63 6b 25 21 31 | 32 3d 69 78 25 2b 69 77 |block%!1|2=ix%+iw|
|00003490| 25 3a 62 6c 6f 63 6b 25 | 21 31 36 3d 69 79 25 2b |%:block%|!16=iy%+|
|000034a0| 69 68 25 3a 62 6c 6f 63 | 6b 25 21 32 30 3d 66 6c |ih%:bloc|k%!20=fl|
|000034b0| 61 67 25 0d 0e 10 0e 20 | e7 20 64 31 25 3d 30 20 |ag%.... |. d1%=0 |
|000034c0| 8c 0d 0e 1a 18 20 20 24 | 28 62 6c 6f 63 6b 25 2b |..... $|(block%+|
|000034d0| 32 34 29 3d 74 65 78 74 | 24 0d 0e 24 06 20 cc 0d |24)=text|$..$. ..|
|000034e0| 0e 2e 2f 20 20 62 6c 6f | 63 6b 25 21 32 34 3d 64 |../ blo|ck%!24=d|
|000034f0| 31 25 3a 62 6c 6f 63 6b | 25 21 32 38 3d 64 32 25 |1%:block|%!28=d2%|
|00003500| 3a 62 6c 6f 63 6b 25 21 | 33 32 3d 64 33 25 0d 0e |:block%!|32=d3%..|
|00003510| 38 06 20 cd 0d 0e 42 2c | 20 c8 99 20 22 57 69 6d |8. ...B,| .. "Wim|
|00003520| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 62 |p_Create|Icon",,b|
|00003530| 6c 6f 63 6b 25 20 b8 20 | 69 68 61 6e 64 6c 65 25 |lock% . |ihandle%|
|00003540| 0d 0e 4c 0e 20 3d 69 68 | 61 6e 64 6c 65 25 0d 0e |..L. =ih|andle%..|
|00003550| 56 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0e |V. .----|------..|
|00003560| 60 5f 20 dd f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |`_ ..ope|nwindow(|
|00003570| 47 25 29 3a 62 6c 6f 63 | 6b 25 21 30 3d 47 25 3a |G%):bloc|k%!0=G%:|
|00003580| c8 99 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |.."Wimp_|GetWindo|
|00003590| 77 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 3a |wState",|,block%:|
|000035a0| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|000035b0| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 3a e1 0d 0e 7e |ow",,blo|ck%:...~|
|000035c0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0e 88 |. .-----|-----...|
|000035d0| 2a 20 dd f2 64 72 61 77 | 6d 65 6e 75 28 6d 25 2c |* ..draw|menu(m%,|
|000035e0| 6d 65 6e 75 24 2c 78 25 | 2c 79 25 2c 6f 6e 69 63 |menu$,x%|,y%,onic|
|000035f0| 6f 6e 62 61 72 25 29 0d | 0e 92 4a 20 6d 25 3f 31 |onbar%).|..J m%?1|
|00003600| 32 3d 37 3a 6d 25 3f 31 | 33 3d 32 3a 6d 25 3f 31 |2=7:m%?1|3=2:m%?1|
|00003610| 34 3d 37 3a 6d 25 3f 31 | 35 3d 30 3a 6d 25 21 31 |4=7:m%?1|5=0:m%!1|
|00003620| 36 3d 32 30 30 3a 6d 25 | 21 32 30 3d 34 34 3a 6d |6=200:m%|!20=44:m|
|00003630| 25 21 32 34 3d 30 3a 70 | 74 72 25 3d 6d 25 2b 32 |%!24=0:p|tr%=m%+2|
|00003640| 38 0d 0e 9c 34 20 24 6d | 25 3d c0 6d 65 6e 75 24 |8...4 $m|%=.menu$|
|00003650| 2c a7 6d 65 6e 75 24 2c | 22 2c 22 29 2d 31 29 3a |,.menu$,|",")-1):|
|00003660| 6d 65 6e 75 24 2b 3d 22 | 2c 22 3a 65 6e 74 72 69 |menu$+="|,":entri|
|00003670| 65 73 25 3d 30 0d 0e a6 | 11 20 c8 95 20 6d 65 6e |es%=0...|. .. men|
|00003680| 75 24 3c 3e 22 22 0d 0e | b0 20 20 6d 65 6e 75 24 |u$<>""..|. menu$|
|00003690| 3d c1 6d 65 6e 75 24 2c | a7 6d 65 6e 75 24 2c 22 |=.menu$,|.menu$,"|
|000036a0| 2c 22 29 2b 31 29 0d 0e | ba 12 20 e7 20 6d 65 6e |,")+1)..|.. . men|
|000036b0| 75 24 3c 3e 22 22 20 8c | 0d 0e c4 28 20 20 70 74 |u$<>"" .|...( pt|
|000036c0| 72 25 21 30 3d 30 3a 70 | 74 72 25 21 34 3d 2d 31 |r%!0=0:p|tr%!4=-1|
|000036d0| 3a 70 74 72 25 21 38 3d | 26 37 30 30 30 30 32 31 |:ptr%!8=|&7000021|
|000036e0| 0d 0e ce 3b 20 20 24 28 | 70 74 72 25 2b 31 32 29 |...; $(|ptr%+12)|
|000036f0| 3d c0 6d 65 6e 75 24 2c | a7 6d 65 6e 75 24 2c 22 |=.menu$,|.menu$,"|
|00003700| 2c 22 29 2d 31 29 3a 70 | 74 72 25 2b 3d 32 34 3a |,")-1):p|tr%+=24:|
|00003710| 65 6e 74 72 69 65 73 25 | 2b 3d 31 0d 0e d8 06 20 |entries%|+=1.... |
|00003720| cd 0d 0e e2 06 20 ce 0d | 0e ec 39 20 70 74 72 25 |..... ..|..9 ptr%|
|00003730| 21 2d 32 34 3d 70 74 72 | 25 21 2d 32 34 20 84 20 |!-24=ptr|%!-24 . |
|00003740| 26 38 30 3a e7 20 6f 6e | 69 63 6f 6e 62 61 72 25 |&80:. on|iconbar%|
|00003750| 20 6d 25 21 33 32 3d 77 | 68 61 6e 64 6c 65 32 25 | m%!32=w|handle2%|
|00003760| 0d 0e f6 36 20 e7 20 6f | 6e 69 63 6f 6e 62 61 72 |...6 . o|niconbar|
|00003770| 25 20 8c 20 79 70 6f 73 | 25 3d 39 36 2b 65 6e 74 |% . ypos|%=96+ent|
|00003780| 72 69 65 73 25 2a 34 34 | 20 8b 20 79 70 6f 73 25 |ries%*44| . ypos%|
|00003790| 3d 79 25 2b 32 30 0d 0f | 00 2a 20 c8 99 22 57 69 |=y%+20..|.* .."Wi|
|000037a0| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|000037b0| 6d 25 2c 78 25 2d 36 34 | 2c 79 70 6f 73 25 3a e1 |m%,x%-64|,ypos%:.|
|000037c0| 0d 0f 0a 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|000037d0| 0d 0f 14 69 20 dd f2 67 | 65 74 6f 72 69 67 69 6e |...i ..g|etorigin|
|000037e0| 28 62 6c 6f 63 6b 25 29 | 3a 78 30 25 3d 62 6c 6f |(block%)|:x0%=blo|
|000037f0| 63 6b 25 21 34 2d 62 6c | 6f 63 6b 25 21 32 30 3a |ck%!4-bl|ock%!20:|
|00003800| 79 30 25 3d 28 62 6c 6f | 63 6b 25 21 31 36 2d 62 |y0%=(blo|ck%!16-b|
|00003810| 6c 6f 63 6b 25 21 32 34 | 29 3a e7 20 77 69 6e 64 |lock%!24|):. wind|
|00003820| 6f 77 25 3d 77 68 61 6e | 64 6c 65 31 25 20 79 30 |ow%=whan|dle1% y0|
|00003830| 25 3d 79 30 25 2d 38 35 | 32 0d 0f 32 24 20 e7 20 |%=y0%-85|2..2$ . |
|00003840| 77 69 6e 64 6f 77 25 3d | 77 68 61 6e 64 6c 65 34 |window%=|whandle4|
|00003850| 25 20 79 30 25 3d 79 30 | 25 2d 36 38 36 0d 0f 3c |% y0%=y0|%-686..<|
|00003860| 24 20 e7 20 77 69 6e 64 | 6f 77 25 3d 77 68 61 6e |$ . wind|ow%=whan|
|00003870| 64 6c 65 35 25 20 79 30 | 25 3d 79 30 25 2d 36 38 |dle5% y0|%=y0%-68|
|00003880| 36 0d 0f 46 24 20 e7 20 | 77 69 6e 64 6f 77 25 3d |6..F$ . |window%=|
|00003890| 77 68 61 6e 64 6c 65 39 | 25 20 79 30 25 3d 79 30 |whandle9|% y0%=y0|
|000038a0| 25 2d 34 31 30 0d 0f 50 | 06 20 e1 0d 0f 5a 10 20 |%-410..P|. ...Z. |
|000038b0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0f 64 44 20 |.-------|---..dD |
|000038c0| dd f2 72 65 64 72 61 77 | 3a 77 69 6e 64 6f 77 25 |..redraw|:window%|
|000038d0| 3d 62 6c 6f 63 6b 25 21 | 30 3a c8 99 22 57 69 6d |=block%!|0:.."Wim|
|000038e0| 70 5f 52 65 64 72 61 77 | 57 69 6e 64 6f 77 22 2c |p_Redraw|Window",|
|000038f0| 2c 62 6c 6f 63 6b 25 20 | b8 20 6d 6f 72 65 25 0d |,block% |. more%.|
|00003900| 0f 82 0d 20 c8 95 20 6d | 6f 72 65 25 0d 0f 86 17 |... .. m|ore%....|
|00003910| 20 f2 67 65 74 6f 72 69 | 67 69 6e 28 62 6c 6f 63 | .getori|gin(bloc|
|00003920| 6b 25 29 0d 0f 87 40 20 | 67 78 30 25 3d 62 6c 6f |k%)...@ |gx0%=blo|
|00003930| 63 6b 25 21 32 38 3a 67 | 79 30 25 3d 62 6c 6f 63 |ck%!28:g|y0%=bloc|
|00003940| 6b 25 21 33 32 3a 67 78 | 31 25 3d 62 6c 6f 63 6b |k%!32:gx|1%=block|
|00003950| 25 21 33 36 3a 67 79 31 | 25 3d 62 6c 6f 63 6b 25 |%!36:gy1|%=block%|
|00003960| 21 34 30 0d 0f 88 38 20 | 67 78 30 25 3d 28 67 78 |!40...8 |gx0%=(gx|
|00003970| 30 25 2d 78 30 25 29 81 | 33 32 2a 33 32 2b 78 30 |0%-x0%).|32*32+x0|
|00003980| 25 3a 67 79 31 25 3d 28 | 67 79 31 25 2d 79 30 25 |%:gy1%=(|gy1%-y0%|
|00003990| 29 81 33 32 2a 33 32 2b | 79 30 25 0d 0f 96 11 20 |).32*32+|y0%.... |
|000039a0| c8 8e 20 77 69 6e 64 6f | 77 25 20 ca 0d 0f 97 10 |.. windo|w% .....|
|000039b0| 20 c9 20 77 68 61 6e 64 | 6c 65 31 25 0d 0f a0 26 | . whand|le1%...&|
|000039c0| 20 20 f2 74 65 78 74 62 | 6f 78 28 78 30 25 2b 32 | .textb|ox(x0%+2|
|000039d0| 30 2c 79 30 25 2b 36 34 | 2c 36 35 32 2c 31 30 30 |0,y0%+64|,652,100|
|000039e0| 38 29 0d 0f a4 52 20 20 | e7 20 a4 69 6e 74 65 72 |8)...R |. .inter|
|000039f0| 73 65 63 74 28 78 30 25 | 2b 31 36 2c 79 30 25 2d |sect(x0%|+16,y0%-|
|00003a00| 31 38 2c 78 30 25 2b 31 | 30 33 32 2c 79 30 25 2b |18,x0%+1|032,y0%+|
|00003a10| 34 38 29 20 f2 74 65 78 | 74 62 6f 78 32 28 78 30 |48) .tex|tbox2(x0|
|00003a20| 25 2b 32 30 2c 79 30 25 | 2d 31 34 2c 31 30 30 38 |%+20,y0%|-14,1008|
|00003a30| 2c 36 30 29 0d 0f a5 36 | 20 20 e7 20 a4 69 6e 74 |,60)...6| . .int|
|00003a40| 65 72 73 65 63 74 28 78 | 30 25 2b 31 31 38 2c 79 |ersect(x|0%+118,y|
|00003a50| 30 25 2b 37 36 30 2c 78 | 30 25 2b 31 30 33 32 2c |0%+760,x|0%+1032,|
|00003a60| 79 30 25 2b 38 35 30 29 | 20 8c 0d 0f ac 28 20 20 |y0%+850)| ....( |
|00003a70| 20 f2 74 65 78 74 62 6f | 78 32 28 78 30 25 2b 31 | .textbo|x2(x0%+1|
|00003a80| 32 32 2c 79 30 25 2b 37 | 38 36 2c 31 39 36 2c 35 |22,y0%+7|86,196,5|
|00003a90| 32 29 0d 0f ae 27 20 20 | 20 f2 74 65 78 74 62 6f |2)...' | .textbo|
|00003aa0| 78 32 28 78 30 25 2b 34 | 31 38 2c 79 30 25 2b 37 |x2(x0%+4|18,y0%+7|
|00003ab0| 38 36 2c 36 38 2c 35 32 | 29 0d 0f b4 28 20 20 20 |86,68,52|)...( |
|00003ac0| f2 74 65 78 74 62 6f 78 | 32 28 78 30 25 2b 37 36 |.textbox|2(x0%+76|
|00003ad0| 38 2c 79 30 25 2b 37 38 | 36 2c 32 36 30 2c 35 32 |8,y0%+78|6,260,52|
|00003ae0| 29 0d 0f b7 07 20 20 cd | 0d 0f be 3c 20 20 c8 99 |).... .|...< ..|
|00003af0| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 32 39 |"OS_Spri|teOp",29|
|00003b00| 30 2c 67 72 61 62 5f 6d | 65 6d 73 74 61 72 74 2c |0,grab_m|emstart,|
|00003b10| 22 61 72 65 61 22 2c 78 | 30 25 2b 32 34 2c 79 30 |"area",x|0%+24,y0|
|00003b20| 25 2b 36 38 0d 0f c8 04 | 0d 0f d2 18 20 f4 20 72 |%+68....|.... . r|
|00003b30| 65 70 65 61 74 20 77 69 | 6e 64 6f 77 2e 2e 2e 2e |epeat wi|ndow....|
|00003b40| 0d 0f dc 31 20 c9 20 77 | 68 61 6e 64 6c 65 34 25 |...1 . w|handle4%|
|00003b50| 3a f2 74 65 78 74 62 6f | 78 28 78 30 25 2b 31 36 |:.textbo|x(x0%+16|
|00003b60| 2c 79 30 25 2b 31 30 38 | 2c 35 34 38 2c 35 31 36 |,y0%+108|,548,516|
|00003b70| 29 0d 0f e6 04 0d 0f f0 | 15 20 f4 20 70 72 6f 63 |).......|. . proc|
|00003b80| 20 77 69 6e 64 6f 77 2e | 2e 2e 0d 0f fa 31 20 c9 | window.|.....1 .|
|00003b90| 20 77 68 61 6e 64 6c 65 | 35 25 3a f2 74 65 78 74 | whandle|5%:.text|
|00003ba0| 62 6f 78 28 78 30 25 2b | 31 36 2c 79 30 25 2b 31 |box(x0%+|16,y0%+1|
|00003bb0| 30 38 2c 35 34 38 2c 35 | 31 36 29 0d 10 04 04 0d |08,548,5|16).....|
|00003bc0| 10 0e 10 20 c9 20 77 68 | 61 6e 64 6c 65 37 25 0d |... . wh|andle7%.|
|00003bd0| 10 18 2d 20 78 78 3d 78 | 30 25 2b 31 36 3a 79 79 |..- xx=x|0%+16:yy|
|00003be0| 3d 79 30 25 2d 33 32 3a | c8 99 22 57 69 6d 70 5f |=y0%-32:|.."Wimp_|
|00003bf0| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 38 0d 10 22 39 |SetColou|r",8.."9|
|00003c00| 20 ec 20 78 30 25 2b 32 | 38 30 2d 28 31 36 2a a9 | . x0%+2|80-(16*.|
|00003c10| c3 28 68 65 6c 70 5f 70 | 61 67 65 29 29 2f 32 2c |.(help_p|age))/2,|
|00003c20| 79 30 25 2d 37 31 30 3a | f1 c3 28 68 65 6c 70 5f |y0%-710:|..(help_|
|00003c30| 70 61 67 65 29 0d 10 2c | 04 0d 10 36 14 20 e7 20 |page)..,|...6. . |
|00003c40| 68 65 6c 70 5f 70 61 67 | 65 3d 31 20 8c 0d 10 40 |help_pag|e=1 ...@|
|00003c50| 2b 20 20 ec 20 78 78 2c | 79 79 3a f1 22 53 75 6d |+ . xx,|yy:."Sum|
|00003c60| 6d 61 72 79 20 6f 66 20 | 43 6f 6d 6d 61 6e 64 73 |mary of |Commands|
|00003c70| 22 3a 79 79 2d 3d 36 34 | 0d 10 4a 0c 20 20 f7 20 |":yy-=64|..J. . |
|00003c80| 8d 44 54 50 0d 10 54 3e | 20 20 dc 20 42 41 43 4b |.DTP..T>| . BACK|
|00003c90| 2c 43 4c 45 41 4e 2c 45 | 4e 44 2c 46 49 4c 4c 2c |,CLEAN,E|ND,FILL,|
|00003ca0| 46 4c 49 50 58 2c 46 4c | 49 50 59 2c 46 4f 52 57 |FLIPX,FL|IPY,FORW|
|00003cb0| 41 52 44 2c 48 49 44 45 | 2c 48 4f 4d 45 2c 4c 45 |ARD,HIDE|,HOME,LE|
|00003cc0| 46 54 0d 10 5e 2e 20 20 | dc 20 4c 4f 41 44 2c 4d |FT..^. |. LOAD,M|
|00003cd0| 41 4b 45 2c 50 45 4e 44 | 4f 57 4e 2c 50 45 4e 55 |AKE,PEND|OWN,PENU|
|00003ce0| 50 2c 52 45 50 45 41 54 | 2c 52 49 47 48 54 2c 2a |P,REPEAT|,RIGHT,*|
|00003cf0| 0d 10 68 08 20 20 dc 2a | 0d 10 72 07 20 20 f5 0d |..h. .*|..r. ..|
|00003d00| 10 7c 2b 20 20 20 f3 20 | 48 45 24 3a e7 20 48 45 |.|+ . |HE$:. HE|
|00003d10| 24 3c 3e 22 2a 22 20 ec | 20 78 78 2c 79 79 3a f1 |$<>"*" .| xx,yy:.|
|00003d20| 48 45 24 3a 79 79 2d 3d | 33 36 0d 10 86 0f 20 20 |HE$:yy-=|36.... |
|00003d30| fd 20 48 45 24 3d 22 2a | 22 0d 10 90 0c 20 20 f7 |. HE$="*|".... .|
|00003d40| 20 8d 74 5a 50 0d 10 9a | 3e 20 20 dc 20 53 45 54 | .tZP...|> . SET|
|00003d50| 43 4f 4c 4f 55 52 2c 53 | 45 54 48 45 41 44 49 4e |COLOUR,S|ETHEADIN|
|00003d60| 47 2c 53 45 54 4e 49 42 | 2c 53 45 54 50 49 54 43 |G,SETNIB|,SETPITC|
|00003d70| 48 2c 53 45 54 53 49 5a | 45 2c 53 45 54 58 2c 53 |H,SETSIZ|E,SETX,S|
|00003d80| 45 54 59 0d 10 a4 36 20 | 20 dc 20 53 48 4f 57 2c |ETY...6 | . SHOW,|
|00003d90| 53 4f 55 4e 44 2c 53 50 | 52 49 54 45 2c 53 59 4d |SOUND,SP|RITE,SYM|
|00003da0| 4f 4e 2c 53 59 4d 4f 46 | 46 2c 54 4f 2c 57 41 49 |ON,SYMOF|F,TO,WAI|
|00003db0| 54 2c 57 52 49 54 45 2c | 2a 0d 10 ae 1a 20 20 78 |T,WRITE,|*.... x|
|00003dc0| 78 3d 78 30 25 2b 32 30 | 34 3a 79 79 3d 79 30 25 |x=x0%+20|4:yy=y0%|
|00003dd0| 2d 39 36 0d 10 b8 07 20 | 20 f5 0d 10 c2 2b 20 20 |-96.... | ....+ |
|00003de0| 20 f3 20 48 45 24 3a e7 | 20 48 45 24 3c 3e 22 2a | . HE$:.| HE$<>"*|
|00003df0| 22 20 ec 20 78 78 2c 79 | 79 3a f1 48 45 24 3a 79 |" . xx,y|y:.HE$:y|
|00003e00| 79 2d 3d 33 36 0d 10 cc | 0f 20 20 fd 20 48 45 24 |y-=36...|. . HE$|
|00003e10| 3d 22 2a 22 0d 10 d6 04 | 0d 10 e0 0c 20 20 f7 20 |="*"....|.... . |
|00003e20| 8d 64 6a 50 0d 10 ea 09 | 20 20 dc 20 2a 0d 10 f4 |.djP....| . *...|
|00003e30| 1a 20 20 78 78 3d 78 30 | 25 2b 33 39 34 3a 79 79 |. xx=x0|%+394:yy|
|00003e40| 3d 79 30 25 2d 39 36 0d | 10 fe 07 20 20 f5 0d 11 |=y0%-96.|... ...|
|00003e50| 08 2b 20 20 20 f3 20 48 | 45 24 3a e7 20 48 45 24 |.+ . H|E$:. HE$|
|00003e60| 3c 3e 22 2a 22 20 ec 20 | 78 78 2c 79 79 3a f1 48 |<>"*" . |xx,yy:.H|
|00003e70| 45 24 3a 79 79 2d 3d 33 | 36 0d 11 12 0f 20 20 fd |E$:yy-=3|6.... .|
|00003e80| 20 48 45 24 3d 22 2a 22 | 0d 11 1c 06 20 cd 0d 11 | HE$="*"|.... ...|
|00003e90| 26 04 0d 11 30 15 20 e7 | 20 68 65 6c 70 5f 70 61 |&...0. .| help_pa|
|00003ea0| 67 65 3c 3e 31 20 8c 0d | 11 3a 18 20 20 f4 20 72 |ge<>1 ..|.:. . r|
|00003eb0| 65 73 74 20 6f 66 20 70 | 61 67 65 73 2e 2e 2e 0d |est of p|ages....|
|00003ec0| 11 44 13 20 20 73 63 72 | 70 25 3d 73 63 72 69 70 |.D. scr|p%=scrip|
|00003ed0| 74 25 0d 11 4e 07 20 20 | f5 0d 11 58 35 20 20 20 |t%..N. |...X5 |
|00003ee0| e7 20 24 73 63 72 70 25 | 3c 3e c3 28 68 65 6c 70 |. $scrp%|<>.(help|
|00003ef0| 5f 70 61 67 65 29 20 73 | 63 72 70 25 3d 73 63 72 |_page) s|crp%=scr|
|00003f00| 70 25 2b 28 a9 24 73 63 | 72 70 25 29 2b 31 0d 11 |p%+(.$sc|rp%)+1..|
|00003f10| 62 34 20 20 fd 20 24 73 | 63 72 70 25 3d c3 28 68 |b4 . $s|crp%=.(h|
|00003f20| 65 6c 70 5f 70 61 67 65 | 29 20 84 20 73 63 72 70 |elp_page|) . scrp|
|00003f30| 25 3d 73 63 72 69 70 74 | 25 2b 73 63 72 70 5f 6c |%=script|%+scrp_l|
|00003f40| 65 6e 0d 11 6c 04 0d 11 | 76 1d 20 20 73 63 72 70 |en..l...|v. scrp|
|00003f50| 25 3d 73 63 72 70 25 2b | 28 a9 24 73 63 72 70 25 |%=scrp%+|(.$scrp%|
|00003f60| 29 2b 31 0d 11 80 07 20 | 20 f5 0d 11 8a 2e 20 20 |)+1.... | ..... |
|00003f70| 20 ec 20 78 78 2c 79 79 | 3a f1 24 73 63 72 70 25 | . xx,yy|:.$scrp%|
|00003f80| 3a 73 63 72 70 25 3d 73 | 63 72 70 25 2b 28 a9 24 |:scrp%=s|crp%+(.$|
|00003f90| 73 63 72 70 25 29 2b 31 | 0d 11 94 36 20 20 20 e7 |scrp%)+1|...6 .|
|00003fa0| 20 24 73 63 72 70 25 3c | 3e 22 45 4f 46 22 3a e7 | $scrp%<|>"EOF":.|
|00003fb0| 20 24 73 63 72 70 25 3c | 3e c3 28 68 65 6c 70 5f | $scrp%<|>.(help_|
|00003fc0| 70 61 67 65 2b 31 29 20 | 79 79 2d 3d 33 32 0d 11 |page+1) |yy-=32..|
|00003fd0| 9e 2c 20 20 fd 20 24 73 | 63 72 70 25 3d 22 45 4f |., . $s|crp%="EO|
|00003fe0| 46 22 20 84 20 24 73 63 | 72 70 25 3d c3 28 68 65 |F" . $sc|rp%=.(he|
|00003ff0| 6c 70 5f 70 61 67 65 2b | 31 29 0d 11 a8 06 20 cd |lp_page+|1).... .|
|00004000| 0d 11 b2 04 0d 11 bc 10 | 20 c9 20 77 68 61 6e 64 |........| . whand|
|00004010| 6c 65 39 25 0d 11 c6 23 | 20 f2 74 65 78 74 62 6f |le9%...#| .textbo|
|00004020| 78 28 78 30 25 2b 32 30 | 2c 79 30 25 2b 38 2c 32 |x(x0%+20|,y0%+8,2|
|00004030| 36 38 2c 32 38 38 29 0d | 11 d0 2d 20 ef 32 34 2c |68,288).|..- .24,|
|00004040| 78 30 25 2b 32 34 3b 79 | 30 25 2b 31 32 3b 78 30 |x0%+24;y|0%+12;x0|
|00004050| 25 2b 32 34 2b 32 38 30 | 3b 79 30 25 2b 31 32 2b |%+24+280|;y0%+12+|
|00004060| 32 36 30 3b 0d 11 da 4c | 20 c8 99 22 4f 53 5f 53 |260;...L| .."OS_S|
|00004070| 70 72 69 74 65 4f 70 22 | 2c 32 39 36 2c 73 70 72 |priteOp"|,296,spr|
|00004080| 69 74 65 70 6f 6f 6c 2c | 73 70 72 69 74 65 5f 6e |itepool,|sprite_n|
|00004090| 61 6d 65 24 20 b8 20 52 | 30 2c 52 31 2c 52 32 2c |ame$ . R|0,R1,R2,|
|000040a0| 73 78 25 2c 73 79 25 2c | 52 35 2c 73 6d 6f 64 65 |sx%,sy%,|R5,smode|
|000040b0| 0d 11 e4 2d 20 c8 99 22 | 4f 53 5f 52 65 61 64 4d |...- .."|OS_ReadM|
|000040c0| 6f 64 65 56 61 72 69 61 | 62 6c 65 22 2c 73 6d 6f |odeVaria|ble",smo|
|000040d0| 64 65 2c 34 20 b8 20 2c | 2c 78 6d 61 67 0d 11 ee |de,4 . ,|,xmag...|
|000040e0| 2d 20 c8 99 22 4f 53 5f | 52 65 61 64 4d 6f 64 65 |- .."OS_|ReadMode|
|000040f0| 56 61 72 69 61 62 6c 65 | 22 2c 73 6d 6f 64 65 2c |Variable|",smode,|
|00004100| 35 20 b8 20 2c 2c 79 6d | 61 67 0d 11 f8 24 20 73 |5 . ,,ym|ag...$ s|
|00004110| 78 25 3d 28 73 78 25 3c | 3c 78 6d 61 67 29 3a 73 |x%=(sx%<|<xmag):s|
|00004120| 79 25 3d 28 73 79 25 3c | 3c 79 6d 61 67 29 0d 12 |y%=(sy%<|<ymag)..|
|00004130| 02 46 20 f2 70 69 63 74 | 75 72 65 28 73 78 25 2a |.F .pict|ure(sx%*|
|00004140| 73 70 72 69 74 65 5f 73 | 69 7a 65 2c 73 79 25 2a |sprite_s|ize,sy%*|
|00004150| 73 70 72 69 74 65 5f 73 | 69 7a 65 2c 73 70 72 69 |sprite_s|ize,spri|
|00004160| 74 65 70 6f 6f 6c 2c 73 | 70 72 69 74 65 5f 6e 61 |tepool,s|prite_na|
|00004170| 6d 65 24 29 0d 12 0c 45 | 20 c8 99 22 4f 53 5f 53 |me$)...E| .."OS_S|
|00004180| 70 72 69 74 65 4f 70 22 | 2c 35 36 34 2c 73 70 72 |priteOp"|,564,spr|
|00004190| 69 74 65 70 6f 6f 6c 2c | 61 64 64 25 2c 78 30 25 |itepool,|add%,x0%|
|000041a0| 2b 32 34 2c 79 30 25 2b | 31 32 2c 38 2c 6d 61 67 |+24,y0%+|12,8,mag|
|000041b0| 25 2c 74 72 61 6e 73 32 | 25 0d 12 16 08 20 ef 32 |%,trans2|%.... .2|
|000041c0| 36 0d 12 20 04 0d 12 2a | 1d 20 c9 20 77 68 61 6e |6.. ...*|. . whan|
|000041d0| 64 6c 65 31 30 25 2c 77 | 68 61 6e 64 6c 65 31 30 |dle10%,w|handle10|
|000041e0| 61 25 0d 12 34 2f 20 c8 | 99 22 4f 53 5f 52 65 61 |a%..4/ .|."OS_Rea|
|000041f0| 64 4d 6f 64 65 56 61 72 | 69 61 62 6c 65 22 2c 2d |dModeVar|iable",-|
|00004200| 31 2c 33 20 b8 20 2c 2c | 63 6f 6c 5f 72 61 6e 67 |1,3 . ,,|col_rang|
|00004210| 65 0d 12 3e 22 20 e7 20 | 63 6f 6c 5f 72 61 6e 67 |e..>" . |col_rang|
|00004220| 65 3d 36 33 20 f2 63 6f | 6c 5f 62 6f 78 65 73 28 |e=63 .co|l_boxes(|
|00004230| 34 38 29 0d 12 48 22 20 | e7 20 63 6f 6c 5f 72 61 |48)..H" |. col_ra|
|00004240| 6e 67 65 3d 31 35 20 f2 | 63 6f 6c 5f 62 6f 78 65 |nge=15 .|col_boxe|
|00004250| 73 28 39 36 29 0d 12 52 | 22 20 e7 20 63 6f 6c 5f |s(96)..R|" . col_|
|00004260| 72 61 6e 67 65 3d 33 20 | f2 63 6f 6c 5f 62 6f 78 |range=3 |.col_box|
|00004270| 65 73 28 31 39 32 29 0d | 12 5c 04 0d 12 70 11 20 |es(192).|.\...p. |
|00004280| c9 20 77 68 61 6e 64 6c | 65 31 33 25 0d 12 7a 3f |. whandl|e13%..z?|
|00004290| 20 f2 66 72 61 6d 65 28 | 78 30 25 2b 32 34 2c 79 | .frame(|x0%+24,y|
|000042a0| 30 25 2d 33 36 30 2c 33 | 30 34 2c 35 32 36 2c 22 |0%-360,3|04,526,"|
|000042b0| 45 72 72 6f 72 20 66 72 | 6f 6d 20 44 65 73 6b 74 |Error fr|om Deskt|
|000042c0| 6f 70 20 54 75 72 74 6c | 65 22 29 0d 12 84 04 0d |op Turtl|e").....|
|000042d0| 12 8e 06 20 cb 0d 12 98 | 2a 20 c8 99 22 57 69 6d |... ....|* .."Wim|
|000042e0| 70 5f 47 65 74 52 65 63 | 74 61 6e 67 6c 65 22 2c |p_GetRec|tangle",|
|000042f0| 2c 62 6c 6f 63 6b 25 20 | b8 20 6d 6f 72 65 25 0d |,block% |. more%.|
|00004300| 12 a2 06 20 ce 0d 12 ac | 06 20 e1 0d 12 b6 10 20 |... ....|. ..... |
|00004310| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 12 c0 50 20 |.-------|---...P |
|00004320| dd f2 69 73 65 74 67 65 | 6e 28 77 68 25 2c 78 25 |..isetge|n(wh%,x%|
|00004330| 2c 61 24 29 3a 62 6c 6f | 63 6b 25 21 30 3d 77 68 |,a$):blo|ck%!0=wh|
|00004340| 25 3a 62 6c 6f 63 6b 25 | 21 34 3d 78 25 3a c8 99 |%:block%|!4=x%:..|
|00004350| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00004360| 74 65 22 2c 2c 62 6c 6f | 63 6b 25 0d 12 d4 4b 20 |te",,blo|ck%...K |
|00004370| 24 28 62 6c 6f 63 6b 25 | 21 32 38 29 3d 61 24 3a |$(block%|!28)=a$:|
|00004380| 62 6c 6f 63 6b 25 21 38 | 3d 30 3a 62 6c 6f 63 6b |block%!8|=0:block|
|00004390| 25 21 31 32 3d 30 3a c8 | 99 22 57 69 6d 70 5f 53 |%!12=0:.|."Wimp_S|
|000043a0| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|000043b0| 6f 63 6b 25 3a e1 0d 12 | e8 10 20 f4 2d 2d 2d 2d |ock%:...|.. .----|
|000043c0| 2d 2d 2d 2d 2d 2d 0d 12 | f2 5e 20 dd f2 69 72 65 |------..|.^ ..ire|
|000043d0| 61 64 67 65 6e 28 77 68 | 25 2c 78 25 29 3a 62 6c |adgen(wh|%,x%):bl|
|000043e0| 6f 63 6b 25 21 30 3d 77 | 68 25 3a 62 6c 6f 63 6b |ock%!0=w|h%:block|
|000043f0| 25 21 34 3d 78 25 3a c8 | 99 22 57 69 6d 70 5f 47 |%!4=x%:.|."Wimp_G|
|00004400| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|00004410| 6f 63 6b 25 3a 61 24 3d | 24 62 6c 6f 63 6b 25 21 |ock%:a$=|$block%!|
|00004420| 32 38 3a e1 0d 13 10 10 | 20 f4 2d 2d 2d 2d 2d 2d |28:.....| .------|
|00004430| 2d 2d 2d 2d 0d 13 1a 11 | 20 dd f2 70 72 69 6e 74 |----....| ..print|
|00004440| 61 62 6f 72 74 0d 13 24 | 4c 20 74 65 78 74 24 3d |abort..$|L text$=|
|00004450| 22 50 72 69 6e 74 69 6e | 67 20 41 62 6f 72 74 65 |"Printin|g Aborte|
|00004460| 64 20 28 22 2b f6 24 2b | 22 29 22 3a f2 61 6c 65 |d ("+.$+|")":.ale|
|00004470| 72 74 28 74 65 78 74 24 | 29 3a 63 6f 70 69 65 73 |rt(text$|):copies|
|00004480| 25 3d 2d 31 3a f2 6d 69 | 6e 69 5f 70 6f 6c 6c 3a |%=-1:.mi|ni_poll:|
|00004490| e1 0d 13 38 0f 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...8. .-|--------|
|000044a0| 0d 13 42 0f 20 dd f2 70 | 72 69 6e 74 5f 69 74 0d |..B. ..p|rint_it.|
|000044b0| 13 4c 33 20 f2 70 64 72 | 69 76 65 72 3a e7 20 74 |.L3 .pdr|iver:. t|
|000044c0| 79 70 24 3d 22 6e 6f 74 | 20 6c 6f 61 64 65 64 22 |yp$="not| loaded"|
|000044d0| 20 f2 6e 6f 64 72 69 76 | 65 72 5f 65 72 72 6f 72 | .nodriv|er_error|
|000044e0| 3a e1 0d 13 56 44 20 e7 | 20 70 6d 6f 72 65 25 3d |:...VD .| pmore%=|
|000044f0| 30 20 f2 69 73 65 74 67 | 65 6e 28 77 68 61 6e 64 |0 .isetg|en(whand|
|00004500| 6c 65 31 34 25 2c 30 2c | 22 52 65 61 64 79 20 74 |le14%,0,|"Ready t|
|00004510| 6f 20 70 72 69 6e 74 20 | 64 72 61 77 69 6e 67 20 |o print |drawing |
|00004520| 61 72 65 61 22 29 0d 13 | 60 4b 20 e7 20 70 6d 6f |area")..|`K . pmo|
|00004530| 72 65 25 3d 31 20 f2 69 | 73 65 74 67 65 6e 28 77 |re%=1 .i|setgen(w|
|00004540| 68 61 6e 64 6c 65 31 34 | 25 2c 30 2c 22 52 65 61 |handle14|%,0,"Rea|
|00004550| 64 79 20 74 6f 20 70 72 | 69 6e 74 20 64 72 61 77 |dy to pr|int draw|
|00004560| 69 6e 67 20 61 72 65 61 | 20 26 20 6c 69 6e 65 22 |ing area| & line"|
|00004570| 29 0d 13 6a 4a 20 e7 20 | 70 6d 6f 72 65 25 3d 32 |)..jJ . |pmore%=2|
|00004580| 20 f2 69 73 65 74 67 65 | 6e 28 77 68 61 6e 64 6c | .isetge|n(whandl|
|00004590| 65 31 34 25 2c 30 2c 22 | 52 65 61 64 79 20 74 6f |e14%,0,"|Ready to|
|000045a0| 20 70 72 69 6e 74 20 73 | 65 6c 65 63 74 65 64 20 | print s|elected |
|000045b0| 70 72 6f 63 65 64 75 72 | 65 22 29 0d 13 74 46 20 |procedur|e")..tF |
|000045c0| e7 20 70 6d 6f 72 65 25 | 3d 33 20 f2 69 73 65 74 |. pmore%|=3 .iset|
|000045d0| 67 65 6e 28 77 68 61 6e | 64 6c 65 31 34 25 2c 30 |gen(whan|dle14%,0|
|000045e0| 2c 22 52 65 61 64 79 20 | 74 6f 20 70 72 69 6e 74 |,"Ready |to print|
|000045f0| 20 61 6c 6c 20 70 72 6f | 63 65 64 75 72 65 73 22 | all pro|cedures"|
|00004600| 29 0d 13 7e 1c 20 f2 6f | 70 65 6e 77 69 6e 64 6f |)..~. .o|penwindo|
|00004610| 77 28 77 68 61 6e 64 6c | 65 31 34 25 29 0d 13 88 |w(whandl|e14%)...|
|00004620| 06 20 e1 0d 13 92 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|00004630| 2d 2d 2d 0d 13 9c 10 20 | dd f2 70 72 69 6e 74 63 |---.... |..printc|
|00004640| 74 72 6c 0d 13 a6 20 20 | f2 6d 69 6e 69 5f 70 6f |trl... |.mini_po|
|00004650| 6c 6c 3a 70 72 69 6e 74 | 65 72 5f 73 74 61 74 75 |ll:print|er_statu|
|00004660| 73 3d 31 0d 13 b0 2c 20 | c8 99 22 4f 53 5f 52 65 |s=1..., |.."OS_Re|
|00004670| 61 64 4d 6f 64 65 56 61 | 72 69 61 62 6c 65 22 2c |adModeVa|riable",|
|00004680| 2d 31 2c 35 20 b8 20 2c | 2c 79 73 74 69 6e 74 0d |-1,5 . ,|,ystint.|
|00004690| 13 ba 2c 20 c8 99 22 4f | 53 5f 52 65 61 64 4d 6f |.., .."O|S_ReadMo|
|000046a0| 64 65 56 61 72 69 61 62 | 6c 65 22 2c 2d 31 2c 34 |deVariab|le",-1,4|
|000046b0| 20 b8 20 2c 2c 78 73 74 | 69 6e 74 0d 13 c4 08 20 | . ,,xst|int.... |
|000046c0| ea 20 85 0d 13 ce 10 20 | ee 20 85 20 ea 3a f7 20 |. ..... |. . .:. |
|000046d0| 85 3a e1 0d 13 d8 31 20 | f2 69 72 65 61 64 67 65 |.:....1 |.ireadge|
|000046e0| 6e 28 77 68 61 6e 64 6c | 65 31 34 25 2c 37 29 3a |n(whandl|e14%,7):|
|000046f0| 63 6f 70 69 65 73 25 3d | bb 28 61 24 29 3a 65 72 |copies%=|.(a$):er|
|00004700| 72 25 3d a3 0d 13 e2 08 | 20 f7 20 85 0d 13 ec 04 |r%=.....| . .....|
|00004710| 0d 13 f6 06 20 f5 0d 14 | 00 12 20 20 e7 20 70 6d |.... ...|.. . pm|
|00004720| 6f 72 65 25 3c 33 20 8c | 0d 14 0a 2d 20 20 20 f2 |ore%<3 .|...- .|
|00004730| 70 72 69 6e 74 3a e7 20 | 65 72 72 25 3d b9 20 f2 |print:. |err%=. .|
|00004740| 70 72 69 6e 74 61 62 6f | 72 74 3a 63 6f 70 69 65 |printabo|rt:copie|
|00004750| 73 25 2d 3d 31 0d 14 14 | 07 20 20 cc 0d 14 1e 15 |s%-=1...|. .....|
|00004760| 20 20 20 63 75 72 72 5f | 6e 75 6d 62 65 72 25 3d | curr_|number%=|
|00004770| 31 0d 14 28 08 20 20 20 | f5 0d 14 32 23 20 20 20 |1..(. |...2# |
|00004780| 20 f2 70 72 69 6e 74 3a | e7 20 65 72 72 25 3d b9 | .print:|. err%=.|
|00004790| 20 f2 70 72 69 6e 74 61 | 62 6f 72 74 0d 14 3c 17 | .printa|bort..<.|
|000047a0| 20 20 20 20 63 75 72 72 | 5f 6e 75 6d 62 65 72 25 | curr|_number%|
|000047b0| 2b 3d 34 0d 14 46 3d 20 | 20 20 20 e7 20 63 75 72 |+=4..F= | . cur|
|000047c0| 72 5f 6e 75 6d 62 65 72 | 25 3c 3d 50 72 6f 63 6e |r_number|%<=Procn|
|000047d0| 61 6d 65 73 25 20 80 20 | 70 72 69 6e 74 5f 70 61 |ames% . |print_pa|
|000047e0| 75 73 65 3d b9 20 f2 70 | 72 6e 5f 70 61 75 73 65 |use=. .p|rn_pause|
|000047f0| 0d 14 50 29 20 20 20 fd | 20 65 72 72 25 3d b9 20 |..P) .| err%=. |
|00004800| 84 20 63 75 72 72 5f 6e | 75 6d 62 65 72 25 3e 50 |. curr_n|umber%>P|
|00004810| 72 6f 63 6e 61 6d 65 73 | 25 0d 14 5a 11 20 20 20 |rocnames|%..Z. |
|00004820| 63 6f 70 69 65 73 25 2d | 3d 31 0d 14 64 07 20 20 |copies%-|=1..d. |
|00004830| cd 0d 14 6e 2c 20 20 e7 | 20 63 6f 70 69 65 73 25 |...n, .| copies%|
|00004840| 3e 30 20 80 20 70 72 69 | 6e 74 5f 70 61 75 73 65 |>0 . pri|nt_pause|
|00004850| 3d b9 20 f2 70 72 6e 5f | 70 61 75 73 65 0d 14 78 |=. .prn_|pause..x|
|00004860| 13 20 fd 20 63 6f 70 69 | 65 73 25 3c 3d 30 3a e1 |. . copi|es%<=0:.|
|00004870| 0d 14 82 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00004880| 0d 14 8c 0c 20 dd f2 70 | 72 69 6e 74 0d 14 96 41 |.... ..p|rint...A|
|00004890| 20 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e | .."Hour|glass_On|
|000048a0| 22 3a c8 99 22 50 44 72 | 69 76 65 72 5f 50 61 67 |":.."PDr|iver_Pag|
|000048b0| 65 53 69 7a 65 22 20 b8 | 20 52 30 2c 52 31 2c 52 |eSize" .| R0,R1,R|
|000048c0| 32 2c 52 33 2c 52 34 2c | 52 35 2c 52 36 0d 14 a0 |2,R3,R4,|R5,R6...|
|000048d0| 18 20 e7 20 52 34 3c 37 | 32 30 30 30 20 52 34 3d |. . R4<7|2000 R4=|
|000048e0| 37 32 30 30 30 0d 14 aa | 24 20 e7 20 52 33 3c 28 |72000...|$ . R3<(|
|000048f0| 37 32 30 30 30 2a 30 2e | 35 29 20 52 33 3d 28 37 |72000*0.|5) R3=(7|
|00004900| 32 30 30 30 2a 30 2e 35 | 29 0d 14 b4 30 20 50 78 |2000*0.5|)...0 Px|
|00004910| 73 69 7a 65 3d a8 28 28 | 52 35 2d 52 33 29 2f 34 |size=.((|R5-R3)/4|
|00004920| 30 30 29 3a 50 79 73 69 | 7a 65 3d a8 28 28 52 36 |00):Pysi|ze=.((R6|
|00004930| 2d 52 34 29 2f 34 30 30 | 29 0d 14 be 1d 20 70 66 |-R4)/400|).... pf|
|00004940| 25 3d ae 28 22 70 72 69 | 6e 74 65 72 3a 22 29 3a |%=.("pri|nter:"):|
|00004950| 65 72 72 25 3d a3 0d 14 | c8 2c 20 e7 20 70 66 25 |err%=...|., . pf%|
|00004960| 3d 30 20 8c 20 85 20 32 | 35 35 2c 22 50 72 69 6e |=0 . . 2|55,"Prin|
|00004970| 74 65 72 20 6e 6f 74 20 | 61 76 61 69 6c 61 62 6c |ter not |availabl|
|00004980| 65 22 0d 14 d2 30 20 c8 | 99 20 22 50 44 72 69 76 |e"...0 .|. "PDriv|
|00004990| 65 72 5f 53 65 6c 65 63 | 74 4a 6f 62 22 2c 70 66 |er_Selec|tJob",pf|
|000049a0| 25 2c 22 44 5f 54 75 72 | 74 6c 65 20 50 52 49 4e |%,"D_Tur|tle PRIN|
|000049b0| 54 22 0d 14 dc 37 20 72 | 65 63 74 25 21 30 3d 30 |T"...7 r|ect%!0=0|
|000049c0| 3a 72 65 63 74 25 21 34 | 3d 30 3a 72 65 63 74 25 |:rect%!4|=0:rect%|
|000049d0| 21 38 3d 50 78 73 69 7a | 65 3a 72 65 63 74 25 21 |!8=Pxsiz|e:rect%!|
|000049e0| 31 32 3d 50 79 73 69 7a | 65 0d 14 e6 41 20 74 72 |12=Pysiz|e...A tr|
|000049f0| 61 6e 73 25 21 30 3d 31 | 3c 3c 31 36 3a 74 72 61 |ans%!0=1|<<16:tra|
|00004a00| 6e 73 25 21 34 3d 30 3c | 3c 31 36 3a 74 72 61 6e |ns%!4=0<|<16:tran|
|00004a10| 73 25 21 38 3d 30 3c 3c | 31 36 3a 74 72 61 6e 73 |s%!8=0<<|16:trans|
|00004a20| 25 21 31 32 3d 31 3c 3c | 31 36 0d 14 f0 1e 20 70 |%!12=1<<|16.... p|
|00004a30| 6c 6f 74 61 74 25 21 30 | 3d 52 33 3a 70 6c 6f 74 |lotat%!0|=R3:plot|
|00004a40| 61 74 25 21 34 3d 52 34 | 0d 14 fa 04 0d 15 04 40 |at%!4=R4|.......@|
|00004a50| 20 c8 99 20 22 50 44 72 | 69 76 65 72 5f 47 69 76 | .. "PDr|iver_Giv|
|00004a60| 65 52 65 63 74 61 6e 67 | 6c 65 22 2c 30 2c 72 65 |eRectang|le",0,re|
|00004a70| 63 74 25 2c 74 72 61 6e | 73 25 2c 70 6c 6f 74 61 |ct%,tran|s%,plota|
|00004a80| 74 25 2c 26 46 46 46 46 | 46 46 30 30 0d 15 0e 31 |t%,&FFFF|FF00...1|
|00004a90| 20 c8 99 20 22 50 44 72 | 69 76 65 72 5f 44 72 61 | .. "PDr|iver_Dra|
|00004aa0| 77 50 61 67 65 22 2c 31 | 2c 72 65 63 74 69 6e 25 |wPage",1|,rectin%|
|00004ab0| 2c 30 2c 30 20 b8 20 6d | 6d 6f 72 65 25 0d 15 18 |,0,0 . m|more%...|
|00004ac0| 26 20 c8 99 22 43 6f 6c | 6f 75 72 54 72 61 6e 73 |& .."Col|ourTrans|
|00004ad0| 5f 53 65 74 47 43 4f 4c | 22 2c 26 30 30 30 30 30 |_SetGCOL|",&00000|
|00004ae0| 30 30 30 0d 15 22 32 20 | c8 99 22 43 6f 6c 6f 75 |000.."2 |.."Colou|
|00004af0| 72 54 72 61 6e 73 5f 53 | 65 74 46 6f 6e 74 43 6f |rTrans_S|etFontCo|
|00004b00| 6c 6f 75 72 73 22 2c 2c | 26 46 46 46 46 46 46 30 |lours",,|&FFFFFF0|
|00004b10| 30 2c 30 2c 36 0d 15 2c | 08 20 ea 20 85 0d 15 36 |0,0,6..,|. . ...6|
|00004b20| 48 20 ee 20 85 20 ea 3a | f7 20 85 3a c8 99 22 50 |H . . .:|. .:.."P|
|00004b30| 44 72 69 76 65 72 5f 41 | 62 6f 72 74 4a 6f 62 22 |Driver_A|bortJob"|
|00004b40| 2c 70 66 25 3a d9 23 70 | 66 25 3a c8 99 22 48 6f |,pf%:.#p|f%:.."Ho|
|00004b50| 75 72 67 6c 61 73 73 5f | 4f 66 66 22 3a 65 72 72 |urglass_|Off":err|
|00004b60| 25 3d b9 3a e1 0d 15 40 | 0e 20 c8 95 20 6d 6d 6f |%=.:...@|. .. mmo|
|00004b70| 72 65 25 0d 15 4a 18 20 | 20 e7 20 70 6d 6f 72 65 |re%..J. | . pmore|
|00004b80| 25 3d 31 20 f2 73 74 79 | 6c 65 31 0d 15 54 18 20 |%=1 .sty|le1..T. |
|00004b90| 20 e7 20 70 6d 6f 72 65 | 25 3d 32 20 f2 73 74 79 | . pmore|%=2 .sty|
|00004ba0| 6c 65 32 0d 15 5e 18 20 | 20 e7 20 70 6d 6f 72 65 |le2..^. | . pmore|
|00004bb0| 25 3d 33 20 f2 73 74 79 | 6c 65 33 0d 15 68 38 20 |%=3 .sty|le3..h8 |
|00004bc0| 20 c8 99 22 50 44 72 69 | 76 65 72 5f 47 65 74 52 | .."PDri|ver_GetR|
|00004bd0| 65 63 74 61 6e 67 6c 65 | 22 2c 2c 72 65 63 74 69 |ectangle|",,recti|
|00004be0| 6e 25 20 b8 20 6d 6d 6f | 72 65 25 2c 2c 72 65 63 |n% . mmo|re%,,rec|
|00004bf0| 69 64 25 0d 15 72 06 20 | ce 0d 15 7c 1b 20 c8 99 |id%..r. |...|. ..|
|00004c00| 22 50 44 72 69 76 65 72 | 5f 45 6e 64 4a 6f 62 22 |"PDriver|_EndJob"|
|00004c10| 2c 70 66 25 0d 15 86 16 | 20 c8 99 22 48 6f 75 72 |,pf%....| .."Hour|
|00004c20| 67 6c 61 73 73 5f 4f 66 | 66 22 0d 15 90 08 20 f7 |glass_Of|f".... .|
|00004c30| 20 85 0d 15 9a 0a 20 d9 | 23 70 66 25 0d 15 a4 1a | ..... .|#pf%....|
|00004c40| 20 e7 20 70 6d 6f 72 65 | 25 3d 32 20 63 6f 70 69 | . pmore|%=2 copi|
|00004c50| 65 73 25 2d 3d 33 0d 15 | ae 06 20 e1 0d 15 b8 10 |es%-=3..|.. .....|
|00004c60| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 15 c2 0d | .------|----....|
|00004c70| 20 dd f2 73 74 79 6c 65 | 31 0d 15 cc 28 20 f2 70 | ..style|1...( .p|
|00004c80| 69 63 74 75 72 65 28 31 | 32 33 35 2c 38 38 34 2c |icture(1|235,884,|
|00004c90| 67 72 61 62 5f 6d 65 6d | 73 74 61 72 74 2c 22 22 |grab_mem|start,""|
|00004ca0| 29 0d 15 d6 4a 20 c8 99 | 22 4f 53 5f 53 70 72 69 |)...J ..|"OS_Spri|
|00004cb0| 74 65 4f 70 22 2c 35 36 | 34 2c 67 72 61 62 5f 6d |teOp",56|4,grab_m|
|00004cc0| 65 6d 73 74 61 72 74 2c | 61 64 64 25 2c 30 2c 50 |emstart,|add%,0,P|
|00004cd0| 79 73 69 7a 65 2d 73 79 | 25 2d 31 36 2c 30 2c 6d |ysize-sy|%-16,0,m|
|00004ce0| 61 67 25 2c 74 72 61 6e | 73 32 25 0d 15 e0 06 20 |ag%,tran|s2%.... |
|00004cf0| e1 0d 15 ea 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00004d00| 2d 0d 15 f4 0d 20 dd f2 | 64 65 66 69 6e 65 0d 15 |-.... ..|define..|
|00004d10| fe 43 20 de 20 61 72 65 | 61 25 20 32 35 36 2c 70 |.C . are|a% 256,p|
|00004d20| 30 25 20 38 2c 70 31 25 | 20 31 36 2c 70 32 25 20 |0% 8,p1%| 16,p2% |
|00004d30| 36 34 2c 70 33 25 20 36 | 34 2c 70 61 6c 62 75 66 |64,p3% 6|4,palbuf|
|00004d40| 66 25 20 36 34 2c 74 72 | 61 6e 73 32 25 20 32 35 |f% 64,tr|ans2% 25|
|00004d50| 36 0d 16 08 1f 20 de 20 | 61 64 64 25 20 32 35 36 |6.... . |add% 256|
|00004d60| 2c 6d 61 67 25 20 32 30 | 2c 70 61 6c 25 20 32 30 |,mag% 20|,pal% 20|
|00004d70| 0d 16 12 45 20 de 20 74 | 72 61 6e 73 25 20 31 36 |...E . t|rans% 16|
|00004d80| 2c 72 65 63 74 25 20 31 | 36 2c 70 6c 6f 74 61 74 |,rect% 1|6,plotat|
|00004d90| 25 20 38 2c 72 65 63 74 | 69 6e 25 20 31 36 2c 62 |% 8,rect|in% 16,b|
|00004da0| 6c 6f 63 6b 25 20 31 37 | 30 30 30 2c 6d 65 6e 75 |lock% 17|000,menu|
|00004db0| 25 26 31 30 30 0d 16 1c | 2e 20 de 20 62 6c 6f 63 |%&100...|. . bloc|
|00004dc0| 6b 32 25 20 32 35 36 2c | 62 6c 6f 63 6b 33 25 20 |k2% 256,|block3% |
|00004dd0| 32 35 36 2c 69 63 6f 6e | 73 70 61 63 65 20 31 38 |256,icon|space 18|
|00004de0| 30 30 30 0d 16 26 3e 20 | de 20 6d 61 69 6e 6d 65 |000..&> |. mainme|
|00004df0| 6e 75 25 20 36 30 30 2c | 70 72 6f 63 6d 65 6e 75 |nu% 600,|procmenu|
|00004e00| 25 20 34 30 30 2c 70 72 | 6f 63 6d 65 6e 75 32 25 |% 400,pr|ocmenu2%|
|00004e10| 20 34 30 30 2c 76 61 72 | 6d 65 6e 75 25 20 34 30 | 400,var|menu% 40|
|00004e20| 30 0d 16 30 32 20 de 20 | 6d 61 67 61 25 20 31 36 |0..02 . |maga% 16|
|00004e30| 2c 6d 61 67 62 25 20 31 | 36 2c 77 64 61 74 61 31 |,magb% 1|6,wdata1|
|00004e40| 25 20 31 37 30 30 30 2c | 73 70 72 6e 61 6d 65 25 |% 17000,|sprname%|
|00004e50| 20 31 33 0d 16 3a 2f 20 | de 20 73 70 72 69 74 65 | 13..:/ |. sprite|
|00004e60| 70 6f 6f 6c 20 32 30 30 | 30 30 2c 64 73 6b 25 20 |pool 200|00,dsk% |
|00004e70| 31 32 30 2c 73 6f 75 6e | 64 6d 65 6e 75 25 20 35 |120,soun|dmenu% 5|
|00004e80| 30 30 0d 16 44 38 20 de | 20 52 65 70 65 61 74 70 |00..D8 .| Repeatp|
|00004e90| 61 64 24 28 35 30 29 2c | 52 65 70 65 61 74 28 35 |ad$(50),|Repeat(5|
|00004ea0| 30 29 2c 6e 69 6e 73 28 | 35 30 29 2c 50 72 6f 63 |0),nins(|50),Proc|
|00004eb0| 6e 61 6d 65 73 24 28 31 | 30 29 0d 16 4e 33 20 de |names$(1|0)..N3 .|
|00004ec0| 20 50 72 6f 31 24 28 31 | 35 2c 31 30 29 2c 56 69 | Pro1$(1|5,10),Vi|
|00004ed0| 72 5f 50 72 6f 31 24 28 | 35 30 2c 31 30 29 2c 56 |r_Pro1$(|50,10),V|
|00004ee0| 69 72 5f 69 6e 73 28 35 | 30 2c 31 30 29 0d 16 58 |ir_ins(5|0,10)..X|
|00004ef0| 3e 20 de 20 56 62 24 28 | 32 30 29 2c 56 62 28 32 |> . Vb$(|20),Vb(2|
|00004f00| 30 29 2c 6f 66 66 73 65 | 74 25 20 34 30 30 2c 62 |0),offse|t% 400,b|
|00004f10| 75 66 66 65 72 25 20 35 | 30 30 30 30 2c 56 74 24 |uffer% 5|0000,Vt$|
|00004f20| 28 32 30 29 2c 56 74 28 | 32 30 29 0d 16 62 2b 20 |(20),Vt(|20)..b+ |
|00004f30| de 20 73 61 76 65 70 69 | 63 25 20 31 30 30 2c 73 |. savepi|c% 100,s|
|00004f40| 61 76 65 64 61 74 61 25 | 20 31 30 30 2c 69 64 65 |avedata%| 100,ide|
|00004f50| 6e 74 25 20 31 31 0d 16 | 6c 46 20 de 20 73 70 72 |nt% 11..|lF . spr|
|00004f60| 73 24 28 37 37 29 2c 73 | 6f 75 6e 64 24 28 31 30 |s$(77),s|ound$(10|
|00004f70| 29 2c 64 69 72 73 65 61 | 72 63 68 20 39 32 34 2c |),dirsea|rch 924,|
|00004f80| 73 70 72 73 6d 65 6e 75 | 25 20 32 30 30 30 2c 69 |sprsmenu|% 2000,i|
|00004f90| 6e 25 20 31 36 2c 6f 75 | 25 20 31 36 0d 16 76 31 |n% 16,ou|% 16..v1|
|00004fa0| 20 69 6e 25 21 30 3d 31 | 32 3a 69 6e 25 21 34 3d | in%!0=1|2:in%!4=|
|00004fb0| 35 3a 69 6e 25 21 38 3d | 31 31 3a 69 6e 25 21 31 |5:in%!8=|11:in%!1|
|00004fc0| 32 3d 34 3a 69 6e 25 21 | 31 36 3d 2d 31 0d 16 80 |2=4:in%!|16=-1...|
|00004fd0| 4f 20 24 62 6c 6f 63 6b | 25 3d 22 54 41 53 4b 22 |O $block|%="TASK"|
|00004fe0| 3a c8 99 22 57 69 6d 70 | 5f 49 6e 69 74 69 61 6c |:.."Wimp|_Initial|
|00004ff0| 69 73 65 22 2c 32 30 30 | 2c 21 62 6c 6f 63 6b 25 |ise",200|,!block%|
|00005000| 2c 22 44 5f 54 75 72 74 | 6c 65 22 20 b8 20 76 65 |,"D_Turt|le" . ve|
|00005010| 72 73 69 6f 6e 25 2c 74 | 61 73 6b 25 0d 16 8a 06 |rsion%,t|ask%....|
|00005020| 20 e1 0d 16 94 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00005030| 2d 2d 0d 16 9e 0e 20 dd | f2 64 65 66 69 6e 65 32 |--.... .|.define2|
|00005040| 0d 16 a8 3f 20 c8 99 22 | 4f 53 5f 52 65 61 64 56 |...? .."|OS_ReadV|
|00005050| 61 72 56 61 6c 22 2c 22 | 21 44 5f 54 75 72 74 6c |arVal","|!D_Turtl|
|00005060| 65 24 44 69 72 22 2c 61 | 72 65 61 25 2c 32 35 36 |e$Dir",a|rea%,256|
|00005070| 2c 30 2c 33 20 b8 20 2c | 2c 6c 65 6e 67 74 68 0d |,0,3 . ,|,length.|
|00005080| 16 b2 21 20 61 72 65 61 | 25 3f 6c 65 6e 67 74 68 |..! area|%?length|
|00005090| 3d 31 33 3a 70 61 74 68 | 24 3d 24 61 72 65 61 25 |=13:path|$=$area%|
|000050a0| 0d 16 bc 2c 20 59 24 3d | 70 61 74 68 24 2b 22 2e |..., Y$=|path$+".|
|000050b0| 54 65 6d 70 6c 61 74 65 | 73 22 3a 59 35 24 3d 70 |Template|s":Y5$=p|
|000050c0| 61 74 68 24 2b 22 2e 48 | 65 6c 70 22 0d 16 c6 2f |ath$+".H|elp".../|
|000050d0| 20 73 6d 6f 64 65 25 3d | 2d 31 3a 77 64 31 65 6e | smode%=|-1:wd1en|
|000050e0| 64 25 3d 77 64 61 74 61 | 31 25 2b 31 37 30 30 30 |d%=wdata|1%+17000|
|000050f0| 3a 42 25 3d 30 3a 50 41 | 25 3d 30 0d 16 d0 54 20 |:B%=0:PA|%=0...T |
|00005100| c8 99 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |.."OS_Sp|riteOp",|
|00005110| 32 36 35 2c 73 70 72 69 | 74 65 70 6f 6f 6c 3a 21 |265,spri|tepool:!|
|00005120| 73 70 72 69 74 65 70 6f | 6f 6c 3d 32 30 30 30 30 |spritepo|ol=20000|
|00005130| 3a 73 70 72 69 74 65 70 | 6f 6f 6c 21 34 3d 30 3a |:spritep|ool!4=0:|
|00005140| 73 70 72 69 74 65 70 6f | 6f 6c 21 38 3d 31 36 0d |spritepo|ol!8=16.|
|00005150| 16 da 50 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |..P .."O|S_Sprite|
|00005160| 4f 70 22 2c 32 36 35 2c | 69 63 6f 6e 73 70 61 63 |Op",265,|iconspac|
|00005170| 65 3a 21 69 63 6f 6e 73 | 70 61 63 65 3d 31 38 30 |e:!icons|pace=180|
|00005180| 30 30 3a 69 63 6f 6e 73 | 70 61 63 65 21 34 3d 30 |00:icons|pace!4=0|
|00005190| 3a 69 63 6f 6e 73 70 61 | 63 65 21 38 3d 31 36 0d |:iconspa|ce!8=16.|
|000051a0| 16 e4 3e 20 6d 64 61 74 | 61 62 6c 6f 63 6b 25 3d |..> mdat|ablock%=|
|000051b0| 93 3a 6d 64 61 74 61 62 | 6c 6f 63 6b 5f 65 6e 64 |.:mdatab|lock_end|
|000051c0| 25 3d 93 3a 67 72 61 62 | 5f 6d 65 6d 73 74 61 72 |%=.:grab|_memstar|
|000051d0| 74 3d 6d 64 61 74 61 62 | 6c 6f 63 6b 25 0d 16 ee |t=mdatab|lock%...|
|000051e0| 0c 20 71 75 69 74 25 3d | a3 0d 16 f8 1e 20 c8 99 |. quit%=|..... ..|
|000051f0| 22 57 69 6d 70 5f 4f 70 | 65 6e 54 65 6d 70 6c 61 |"Wimp_Op|enTempla|
|00005200| 74 65 22 2c 2c 59 24 0d | 17 02 37 20 77 68 61 6e |te",,Y$.|..7 whan|
|00005210| 64 6c 65 31 25 3d a4 54 | 65 6d 70 28 22 44 69 73 |dle1%=.T|emp("Dis|
|00005220| 70 6c 61 79 22 29 3a 77 | 68 61 6e 64 6c 65 32 25 |play"):w|handle2%|
|00005230| 3d a4 54 65 6d 70 28 22 | 49 6e 66 6f 22 29 0d 17 |=.Temp("|Info")..|
|00005240| 0c 37 20 77 68 61 6e 64 | 6c 65 33 25 3d a4 54 65 |.7 whand|le3%=.Te|
|00005250| 6d 70 28 22 53 61 76 65 | 22 29 3a 77 68 61 6e 64 |mp("Save|"):whand|
|00005260| 6c 65 34 25 3d a4 54 65 | 6d 70 28 22 50 61 64 6c |le4%=.Te|mp("Padl|
|00005270| 69 73 74 22 29 0d 17 16 | 36 20 77 68 61 6e 64 6c |ist")...|6 whandl|
|00005280| 65 35 25 3d a4 54 65 6d | 70 28 22 50 72 6f 63 22 |e5%=.Tem|p("Proc"|
|00005290| 29 3a 77 68 61 6e 64 6c | 65 36 25 3d a4 54 65 6d |):whandl|e6%=.Tem|
|000052a0| 70 28 22 53 54 41 54 55 | 53 22 29 0d 17 20 38 20 |p("STATU|S").. 8 |
|000052b0| 77 68 61 6e 64 6c 65 37 | 25 3d a4 54 65 6d 70 28 |whandle7|%=.Temp(|
|000052c0| 22 48 65 6c 70 49 6e 66 | 6f 22 29 3a 77 68 61 6e |"HelpInf|o"):whan|
|000052d0| 64 6c 65 38 25 3d a4 54 | 65 6d 70 28 22 64 72 61 |dle8%=.T|emp("dra|
|000052e0| 67 22 29 0d 17 2a 3b 20 | 77 68 61 6e 64 6c 65 39 |g")..*; |whandle9|
|000052f0| 25 3d a4 54 65 6d 70 28 | 22 53 70 72 53 74 61 74 |%=.Temp(|"SprStat|
|00005300| 22 29 3a 77 68 61 6e 64 | 6c 65 31 30 25 3d a4 54 |"):whand|le10%=.T|
|00005310| 65 6d 70 28 22 63 6f 6c | 6f 75 72 73 22 29 0d 17 |emp("col|ours")..|
|00005320| 34 3a 20 77 68 61 6e 64 | 6c 65 31 32 25 3d a4 54 |4: whand|le12%=.T|
|00005330| 65 6d 70 28 22 69 6e 70 | 75 74 22 29 3a 77 68 61 |emp("inp|ut"):wha|
|00005340| 6e 64 6c 65 36 61 25 3d | a4 54 65 6d 70 28 22 53 |ndle6a%=|.Temp("S|
|00005350| 54 41 54 55 53 32 22 29 | 0d 17 3e 3b 20 77 68 61 |TATUS2")|..>; wha|
|00005360| 6e 64 6c 65 31 33 25 3d | a4 54 65 6d 70 28 22 65 |ndle13%=|.Temp("e|
|00005370| 72 72 6f 72 62 6f 78 22 | 29 3a 77 68 61 6e 64 6c |rrorbox"|):whandl|
|00005380| 65 31 34 25 3d a4 54 65 | 6d 70 28 22 70 72 69 6e |e14%=.Te|mp("prin|
|00005390| 74 22 29 0d 17 48 3c 20 | 70 61 75 73 65 5f 77 69 |t")..H< |pause_wi|
|000053a0| 6e 25 3d a4 54 65 6d 70 | 28 22 70 61 75 73 65 22 |n%=.Temp|("pause"|
|000053b0| 29 3a 77 68 61 6e 64 6c | 65 31 30 61 25 3d a4 54 |):whandl|e10a%=.T|
|000053c0| 65 6d 70 28 22 63 6f 6c | 6f 75 72 73 32 22 29 0d |emp("col|ours2").|
|000053d0| 17 49 16 20 72 65 67 25 | 3d a4 54 65 6d 70 28 22 |.I. reg%|=.Temp("|
|000053e0| 72 65 67 22 29 0d 17 52 | 1b 20 c8 99 22 57 69 6d |reg")..R|. .."Wim|
|000053f0| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00005400| 0d 17 5c 23 20 73 70 72 | 69 74 65 73 5f 70 61 74 |..\# spr|ites_pat|
|00005410| 68 24 3d 70 61 74 68 24 | 2b 22 2e 53 70 72 69 74 |h$=path$|+".Sprit|
|00005420| 65 73 22 0d 17 66 3e 20 | c8 99 22 4f 53 5f 53 70 |es"..f> |.."OS_Sp|
|00005430| 72 69 74 65 4f 70 22 2c | 32 36 36 2c 73 70 72 69 |riteOp",|266,spri|
|00005440| 74 65 70 6f 6f 6c 2c 28 | 73 70 72 69 74 65 73 5f |tepool,(|sprites_|
|00005450| 70 61 74 68 24 2b 22 2e | 44 65 66 61 75 6c 74 22 |path$+".|Default"|
|00005460| 29 0d 17 70 33 20 c8 99 | 22 4f 53 5f 53 70 72 69 |)..p3 ..|"OS_Spri|
|00005470| 74 65 4f 70 22 2c 32 36 | 36 2c 69 63 6f 6e 73 70 |teOp",26|6,iconsp|
|00005480| 61 63 65 2c 28 70 61 74 | 68 24 2b 22 2e 49 63 6f |ace,(pat|h$+".Ico|
|00005490| 6e 73 22 29 0d 17 7a 28 | 20 c8 99 22 4f 53 5f 46 |ns")..z(| .."OS_F|
|000054a0| 69 6c 65 22 2c 31 35 2c | 59 35 24 20 b8 20 52 30 |ile",15,|Y5$ . R0|
|000054b0| 2c 52 31 2c 52 32 2c 52 | 33 2c 52 34 0d 17 84 32 |,R1,R2,R|3,R4...2|
|000054c0| 20 de 20 73 63 72 69 70 | 74 25 20 28 52 34 2b 34 | . scrip|t% (R4+4|
|000054d0| 29 3a c8 99 22 4f 53 5f | 46 69 6c 65 22 2c 31 36 |):.."OS_|File",16|
|000054e0| 2c 59 35 24 2c 73 63 72 | 69 70 74 25 2c 30 0d 17 |,Y5$,scr|ipt%,0..|
|000054f0| 8e 3a 20 e3 20 6c 6f 6f | 70 3d 30 20 b8 20 52 34 |.: . loo|p=0 . R4|
|00005500| 3a e7 20 3f 28 73 63 72 | 69 70 74 25 2b 6c 6f 6f |:. ?(scr|ipt%+loo|
|00005510| 70 29 3d 31 30 20 3f 28 | 73 63 72 69 70 74 25 2b |p)=10 ?(|script%+|
|00005520| 6c 6f 6f 70 29 3d 31 33 | 0d 17 98 12 20 ed 3a 73 |loop)=13|.... .:s|
|00005530| 63 72 70 5f 6c 65 6e 3d | 52 34 0d 17 a2 37 20 63 |crp_len=|R4...7 c|
|00005540| 75 72 72 65 6e 74 6d 6f | 64 65 25 3d 31 32 3a 73 |urrentmo|de%=12:s|
|00005550| 74 61 72 74 5f 69 74 3d | 31 3a 63 68 6e 67 5f 6d |tart_it=|1:chng_m|
|00005560| 6f 64 65 3d 30 3a 68 65 | 6c 70 5f 70 61 67 65 3d |ode=0:he|lp_page=|
|00005570| 31 0d 17 ac 2c 20 73 68 | 6f 77 5f 74 75 72 74 6c |1..., sh|ow_turtl|
|00005580| 65 3d b9 3a 63 6f 70 79 | 5f 63 6f 75 6e 74 3d 32 |e=.:copy|_count=2|
|00005590| 3a 50 72 6f 63 6e 61 6d | 65 73 25 3d 30 0d 17 b6 |:Procnam|es%=0...|
|000055a0| 22 20 c8 a0 20 32 3a 59 | 24 3d 70 61 74 68 24 2b |" .. 2:Y|$=path$+|
|000055b0| 22 2e 53 6f 75 6e 64 73 | 2e 53 6f 75 6e 64 22 0d |".Sounds|.Sound".|
|000055c0| 17 c0 20 20 73 6f 75 6e | 64 5f 70 61 74 68 24 3d |.. soun|d_path$=|
|000055d0| 70 61 74 68 24 2b 22 2e | 53 6f 75 6e 64 73 22 0d |path$+".|Sounds".|
|000055e0| 17 ca 15 20 ff 20 28 22 | 52 4d 4c 6f 61 64 20 22 |... . ("|RMLoad "|
|000055f0| 2b 59 24 29 0d 17 d4 17 | 20 2a 43 48 41 4e 4e 45 |+Y$)....| *CHANNE|
|00005600| 4c 56 4f 49 43 45 20 32 | 20 31 30 0d 17 de 37 20 |LVOICE 2| 10...7 |
|00005610| 73 6f 75 6e 64 5f 70 69 | 74 63 68 3d 30 3a 73 70 |sound_pi|tch=0:sp|
|00005620| 72 69 74 65 5f 73 69 7a | 65 3d 31 3a 73 70 72 69 |rite_siz|e=1:spri|
|00005630| 74 65 5f 6e 61 6d 65 24 | 3d 22 44 65 66 61 75 6c |te_name$|="Defaul|
|00005640| 74 22 0d 17 e8 0e 20 2a | 46 58 32 30 32 2c 33 32 |t".... *|FX202,32|
|00005650| 0d 17 f2 39 20 70 65 6e | 5f 74 68 69 63 6b 3d 31 |...9 pen|_thick=1|
|00005660| 3a 73 79 6d 6d 5f 6f 6e | 3d 30 3a 70 72 69 6e 74 |:symm_on|=0:print|
|00005670| 65 72 5f 73 74 61 74 75 | 73 3d 30 3a 70 72 69 6e |er_statu|s=0:prin|
|00005680| 74 5f 70 61 75 73 65 3d | b9 0d 17 fc 06 20 e1 0d |t_pause=|..... ..|
|00005690| 18 06 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|000056a0| 18 10 11 20 dd f2 69 6e | 69 74 69 61 6c 69 73 65 |... ..in|itialise|
|000056b0| 0d 18 1a 3f 20 61 6e 67 | 6c 65 3d 39 30 3a 70 65 |...? ang|le=90:pe|
|000056c0| 6e 24 3d 22 64 6f 77 6e | 22 3a 63 6f 6c 6f 75 72 |n$="down|":colour|
|000056d0| 3d 37 3a 74 78 70 6f 73 | 3d 35 30 30 3a 74 79 70 |=7:txpos|=500:typ|
|000056e0| 6f 73 3d 33 32 32 3a 66 | 6c 61 67 67 25 3d a3 0d |os=322:f|lagg%=..|
|000056f0| 18 24 44 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |.$D .."W|imp_SetC|
|00005700| 6f 6c 6f 75 72 22 2c 37 | 3a 72 65 70 73 25 3d 30 |olour",7|:reps%=0|
|00005710| 3a 65 6e 64 73 25 3d 30 | 3a 73 68 6f 77 5f 74 75 |:ends%=0|:show_tu|
|00005720| 72 74 6c 65 3d b9 3a 50 | 72 6f 63 6e 61 6d 65 73 |rtle=.:P|rocnames|
|00005730| 25 3d 30 0d 18 2e 45 20 | 56 62 3d 30 3a 72 65 70 |%=0...E |Vb=0:rep|
|00005740| 65 61 74 5f 77 69 6e 3d | 30 3a 73 79 6e 5f 66 6c |eat_win=|0:syn_fl|
|00005750| 61 67 3d 31 3a 73 74 6f | 72 65 64 5f 72 6f 75 74 |ag=1:sto|red_rout|
|00005760| 69 6e 65 73 3d 30 3a 70 | 72 6f 63 5f 6c 6f 6f 70 |ines=0:p|roc_loop|
|00005770| 3d 30 3a 61 24 3d 22 22 | 0d 18 38 0e 20 61 62 6f |=0:a$=""|..8. abo|
|00005780| 72 74 3d 30 3a e1 0d 18 | 42 10 20 f4 2d 2d 2d 2d |rt=0:...|B. .----|
|00005790| 2d 2d 2d 2d 2d 2d 0d 18 | 4c 11 20 dd f2 64 72 61 |------..|L. ..dra|
|000057a0| 77 74 75 72 74 6c 65 0d | 18 56 35 20 c8 99 22 4f |wturtle.|.V5 .."O|
|000057b0| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 33 31 36 2c |S_Sprite|Op",316,|
|000057c0| 67 72 61 62 5f 6d 65 6d | 73 74 61 72 74 2c 22 61 |grab_mem|start,"a|
|000057d0| 72 65 61 22 2c 30 3a e6 | 20 33 2c 36 0d 18 60 28 |rea",0:.| 3,6..`(|
|000057e0| 20 74 31 78 3d 74 78 70 | 6f 73 2b 28 34 30 2a 9b | t1x=txp|os+(40*.|
|000057f0| 28 28 61 6e 67 6c 65 2b | 31 36 30 29 2a af 2f 31 |((angle+|160)*./1|
|00005800| 38 30 29 29 0d 18 6a 28 | 20 74 31 79 3d 74 79 70 |80))..j(| t1y=typ|
|00005810| 6f 73 2b 28 34 30 2a b5 | 28 28 61 6e 67 6c 65 2b |os+(40*.|((angle+|
|00005820| 31 36 30 29 2a af 2f 31 | 38 30 29 29 0d 18 74 28 |160)*./1|80))..t(|
|00005830| 20 74 32 78 3d 74 78 70 | 6f 73 2b 28 34 30 2a 9b | t2x=txp|os+(40*.|
|00005840| 28 28 61 6e 67 6c 65 2b | 32 30 30 29 2a af 2f 31 |((angle+|200)*./1|
|00005850| 38 30 29 29 0d 18 7e 28 | 20 74 32 79 3d 74 79 70 |80))..~(| t2y=typ|
|00005860| 6f 73 2b 28 34 30 2a b5 | 28 28 61 6e 67 6c 65 2b |os+(40*.|((angle+|
|00005870| 32 30 30 29 2a af 2f 31 | 38 30 29 29 0d 18 88 49 |200)*./1|80))...I|
|00005880| 20 e7 20 73 68 6f 77 5f | 74 75 72 74 6c 65 3d b9 | . show_|turtle=.|
|00005890| 20 ec 20 74 31 78 2c 74 | 31 79 3a ec 20 74 32 78 | . t1x,t|1y:. t2x|
|000058a0| 2c 74 32 79 3a f0 20 38 | 36 2c 74 78 70 6f 73 2c |,t2y:. 8|6,txpos,|
|000058b0| 74 79 70 6f 73 20 8b 20 | ec 20 74 78 70 6f 73 2c |typos . |. txpos,|
|000058c0| 74 79 70 6f 73 0d 18 92 | 2a 20 c8 99 22 4f 53 5f |typos...|* .."OS_|
|000058d0| 53 70 72 69 74 65 4f 70 | 22 2c 33 31 36 2c 67 72 |SpriteOp|",316,gr|
|000058e0| 61 62 5f 6d 65 6d 73 74 | 61 72 74 2c 30 2c 31 0d |ab_memst|art,0,1.|
|000058f0| 18 9c 32 20 f2 72 61 64 | 69 6f 5f 63 6c 69 63 6b |..2 .rad|io_click|
|00005900| 28 77 68 61 6e 64 6c 65 | 31 25 2c 32 30 2c 2d 37 |(whandle|1%,20,-7|
|00005910| 38 34 2c 31 30 32 38 2c | 2d 37 38 34 2b 36 35 32 |84,1028,|-784+652|
|00005920| 29 0d 18 a6 06 20 e1 0d | 18 b0 10 20 f4 2d 2d 2d |).... ..|... .---|
|00005930| 2d 2d 2d 2d 2d 2d 2d 0d | 18 ba 17 20 dd f2 73 63 |-------.|... ..sc|
|00005940| 61 6e 63 6f 6d 6d 61 6e | 64 28 43 43 24 29 0d 18 |ancomman|d(CC$)..|
|00005950| c4 2d 20 f2 64 72 61 77 | 74 75 72 74 6c 65 3a f2 |.- .draw|turtle:.|
|00005960| 73 79 6e 74 61 78 5f 31 | 3a e7 20 73 79 6e 5f 66 |syntax_1|:. syn_f|
|00005970| 6c 61 67 3d 31 20 f2 6f | 6f 3a e1 0d 18 ce 22 20 |lag=1 .o|o:...." |
|00005980| f2 63 68 65 63 6b 5f 65 | 73 63 61 70 65 3a e7 20 |.check_e|scape:. |
|00005990| 61 62 6f 72 74 3d 31 20 | f2 6f 6f 3a e1 0d 18 d8 |abort=1 |.oo:....|
|000059a0| 0a 20 f2 73 63 61 6e 0d | 18 e2 12 20 e7 20 43 24 |. .scan.|... . C$|
|000059b0| 3d 22 22 20 f2 6f 6f 3a | e1 0d 18 ec 1f 20 e7 20 |="" .oo:|..... . |
|000059c0| 43 24 3d 22 46 44 22 20 | f2 6d 6f 74 69 6f 6e 28 |C$="FD" |.motion(|
|000059d0| 31 29 3a f2 6f 6f 3a e1 | 0d 18 f6 18 20 e7 20 43 |1):.oo:.|.... . C|
|000059e0| 24 3d 22 52 54 22 20 f2 | 72 74 3a f2 6f 6f 3a e1 |$="RT" .|rt:.oo:.|
|000059f0| 0d 19 00 18 20 e7 20 43 | 24 3d 22 4c 54 22 20 f2 |.... . C|$="LT" .|
|00005a00| 6c 74 3a f2 6f 6f 3a e1 | 0d 19 0a 20 20 e7 20 43 |lt:.oo:.|... . C|
|00005a10| 24 3d 22 42 4b 22 20 f2 | 6d 6f 74 69 6f 6e 28 2d |$="BK" .|motion(-|
|00005a20| 31 29 3a f2 6f 6f 3a e1 | 0d 19 14 1a 20 e7 20 43 |1):.oo:.|.... . C|
|00005a30| 24 3d 22 48 4f 4d 45 22 | 20 f2 68 6d 3a f2 6f 6f |$="HOME"| .hm:.oo|
|00005a40| 3a e1 0d 19 1e 20 20 e7 | 20 43 24 3d 22 52 45 50 |:.... .| C$="REP|
|00005a50| 45 41 54 22 20 f2 72 65 | 70 65 61 74 3a f2 6f 6f |EAT" .re|peat:.oo|
|00005a60| 3a e1 0d 19 28 1c 20 e7 | 20 43 24 3d 22 43 4c 53 |:...(. .| C$="CLS|
|00005a70| 22 20 f2 63 6c 65 61 6e | 3a f2 6f 6f 3a e1 0d 19 |" .clean|:.oo:...|
|00005a80| 32 1e 20 e7 20 43 24 3d | 22 50 45 4e 55 50 22 20 |2. . C$=|"PENUP" |
|00005a90| f2 70 65 6e 75 70 3a f2 | 6f 6f 3a e1 0d 19 3c 22 |.penup:.|oo:...<"|
|00005aa0| 20 e7 20 43 24 3d 22 50 | 45 4e 44 4f 57 4e 22 20 | . C$="P|ENDOWN" |
|00005ab0| f2 70 65 6e 64 6f 77 6e | 3a f2 6f 6f 3a e1 0d 19 |.pendown|:.oo:...|
|00005ac0| 46 18 20 e7 20 43 24 3d | 22 54 4f 22 20 f2 74 6f |F. . C$=|"TO" .to|
|00005ad0| 3a f2 6f 6f 3a e1 0d 19 | 50 1c 20 e7 20 43 24 3d |:.oo:...|P. . C$=|
|00005ae0| 22 4d 41 4b 45 22 20 f2 | 6d 61 6b 65 3a f2 6f 6f |"MAKE" .|make:.oo|
|00005af0| 3a e1 0d 19 5a 20 20 e7 | 20 43 24 3d 22 43 4f 4c |:...Z .| C$="COL|
|00005b00| 4f 55 52 22 20 f2 63 6f | 6c 6f 75 72 3a f2 6f 6f |OUR" .co|lour:.oo|
|00005b10| 3a e1 0d 19 64 20 20 e7 | 20 43 24 3d 22 43 49 52 |:...d .| C$="CIR|
|00005b20| 43 4c 45 22 20 f2 63 69 | 72 63 6c 65 3a f2 6f 6f |CLE" .ci|rcle:.oo|
|00005b30| 3a e1 0d 19 6e 1c 20 e7 | 20 43 24 3d 22 46 49 4c |:...n. .| C$="FIL|
|00005b40| 4c 22 20 f2 66 69 6c 6c | 3a f2 6f 6f 3a e1 0d 19 |L" .fill|:.oo:...|
|00005b50| 78 1c 20 e7 20 43 24 3d | 22 53 45 54 58 22 20 f2 |x. . C$=|"SETX" .|
|00005b60| 73 65 74 78 3a f2 6f 6f | 3a e1 0d 19 82 1c 20 e7 |setx:.oo|:..... .|
|00005b70| 20 43 24 3d 22 53 45 54 | 59 22 20 f2 73 65 74 79 | C$="SET|Y" .sety|
|00005b80| 3a f2 6f 6f 3a e1 0d 19 | 8c 25 20 e7 20 43 24 3d |:.oo:...|.% . C$=|
|00005b90| 22 48 45 41 44 49 4e 47 | 22 20 f2 73 65 74 68 65 |"HEADING|" .sethe|
|00005ba0| 61 64 69 6e 67 3a f2 6f | 6f 3a e1 0d 19 96 1e 20 |ading:.o|o:..... |
|00005bb0| e7 20 43 24 3d 22 57 52 | 49 54 45 22 20 f2 77 72 |. C$="WR|ITE" .wr|
|00005bc0| 69 74 65 3a f2 6f 6f 3a | e1 0d 19 a0 1c 20 e7 20 |ite:.oo:|..... . |
|00005bd0| 43 24 3d 22 53 48 4f 57 | 22 20 f2 73 68 6f 77 3a |C$="SHOW|" .show:|
|00005be0| f2 6f 6f 3a e1 0d 19 aa | 1c 20 e7 20 43 24 3d 22 |.oo:....|. . C$="|
|00005bf0| 48 49 44 45 22 20 f2 68 | 69 64 65 3a f2 6f 6f 3a |HIDE" .h|ide:.oo:|
|00005c00| e1 0d 19 b4 1e 20 e7 20 | 43 24 3d 22 53 4f 55 4e |..... . |C$="SOUN|
|00005c10| 44 22 20 f2 73 6f 75 6e | 64 3a f2 6f 6f 3a e1 0d |D" .soun|d:.oo:..|
|00005c20| 19 be 1c 20 e7 20 43 24 | 3d 22 57 41 49 54 22 20 |... . C$|="WAIT" |
|00005c30| f2 77 61 69 74 3a f2 6f | 6f 3a e1 0d 19 c8 20 20 |.wait:.o|o:.... |
|00005c40| e7 20 43 24 3d 22 53 50 | 52 49 54 45 22 20 f2 73 |. C$="SP|RITE" .s|
|00005c50| 70 72 69 74 65 3a f2 6f | 6f 3a e1 0d 19 d2 22 20 |prite:.o|o:...." |
|00005c60| e7 20 43 24 3d 22 4c 4f | 41 44 22 20 f2 6c 6f 61 |. C$="LO|AD" .loa|
|00005c70| 64 73 70 72 69 74 65 3a | f2 6f 6f 3a e1 0d 19 dc |dsprite:|.oo:....|
|00005c80| 25 20 e7 20 43 24 3d 22 | 53 45 54 53 49 5a 45 22 |% . C$="|SETSIZE"|
|00005c90| 20 f2 73 70 72 69 74 65 | 73 69 7a 65 3a f2 6f 6f | .sprite|size:.oo|
|00005ca0| 3a e1 0d 19 e6 1e 20 e7 | 20 43 24 3d 22 46 4c 49 |:..... .| C$="FLI|
|00005cb0| 50 58 22 20 f2 66 6c 69 | 70 78 3a f2 6f 6f 3a e1 |PX" .fli|px:.oo:.|
|00005cc0| 0d 19 f0 1e 20 e7 20 43 | 24 3d 22 46 4c 49 50 59 |.... . C|$="FLIPY|
|00005cd0| 22 20 f2 66 6c 69 70 79 | 3a f2 6f 6f 3a e1 0d 19 |" .flipy|:.oo:...|
|00005ce0| fa 27 20 e7 20 43 24 3d | 22 53 45 54 50 49 54 43 |.' . C$=|"SETPITC|
|00005cf0| 48 22 20 f2 73 6f 75 6e | 64 5f 70 69 74 63 68 3a |H" .soun|d_pitch:|
|00005d00| f2 6f 6f 3a e1 0d 1a 04 | 27 20 e7 20 43 24 3d 22 |.oo:....|' . C$="|
|00005d10| 53 45 54 4e 49 42 22 20 | f2 73 65 74 5f 74 68 69 |SETNIB" |.set_thi|
|00005d20| 63 6b 6e 65 73 73 3a f2 | 6f 6f 3a e1 0d 1a 0e 1c |ckness:.|oo:.....|
|00005d30| 20 e7 20 43 24 3d 22 53 | 59 4d 4f 4e 22 20 f2 73 | . C$="S|YMON" .s|
|00005d40| 79 6d 3a f2 6f 6f 3a e1 | 0d 1a 18 1d 20 e7 20 43 |ym:.oo:.|.... . C|
|00005d50| 24 3d 22 53 59 4d 4f 46 | 46 22 20 f2 73 79 6d 3a |$="SYMOF|F" .sym:|
|00005d60| f2 6f 6f 3a e1 0d 1a 22 | 1e 20 e7 20 43 24 3d 22 |.oo:..."|. . C$="|
|00005d70| 49 4e 50 55 54 22 20 f2 | 69 6e 70 75 74 3a f2 6f |INPUT" .|input:.o|
|00005d80| 6f 3a e1 0d 1a 2c 12 20 | f2 63 68 65 63 6b 70 72 |o:...,. |.checkpr|
|00005d90| 6f 63 73 3a e1 0d 1a 36 | 10 20 f4 2d 2d 2d 2d 2d |ocs:...6|. .-----|
|00005da0| 2d 2d 2d 2d 2d 0d 1a 40 | 17 20 dd f2 6f 6f 3a f2 |-----..@|. ..oo:.|
|00005db0| 64 72 61 77 74 75 72 74 | 6c 65 3a e1 0d 1a 4a 10 |drawturt|le:...J.|
|00005dc0| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 1a 54 21 | .------|----..T!|
|00005dd0| 20 dd f2 72 74 3a f2 66 | 69 6e 64 6e 75 6d 62 65 | ..rt:.f|indnumbe|
|00005de0| 72 3a e7 20 61 62 6f 72 | 74 3d 31 20 e1 0d 1a 68 |r:. abor|t=1 ...h|
|00005df0| 13 20 61 6e 67 6c 65 3d | 61 6e 67 6c 65 2d 4e 6f |. angle=|angle-No|
|00005e00| 0d 1a 72 20 20 f5 3a e7 | 20 61 6e 67 6c 65 3c 30 |..r .:.| angle<0|
|00005e10| 20 61 6e 67 6c 65 3d 61 | 6e 67 6c 65 2b 33 36 30 | angle=a|ngle+360|
|00005e20| 0d 1a 7c 0f 20 fd 20 61 | 6e 67 6c 65 3e 3d 30 0d |..|. . a|ngle>=0.|
|00005e30| 1a 86 04 0d 1a 90 2d 20 | f5 3a e7 20 61 6e 67 6c |......- |.:. angl|
|00005e40| 65 3e 33 35 39 2e 39 39 | 39 39 39 39 39 39 39 39 |e>359.99|99999999|
|00005e50| 20 61 6e 67 6c 65 3d 61 | 6e 67 6c 65 2d 33 36 30 | angle=a|ngle-360|
|00005e60| 0d 1a 9a 1c 20 fd 20 61 | 6e 67 6c 65 3c 3d 33 35 |.... . a|ngle<=35|
|00005e70| 39 2e 39 39 39 39 39 39 | 39 39 39 39 0d 1a a4 06 |9.999999|9999....|
|00005e80| 20 e1 0d 1a ae 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00005e90| 2d 2d 0d 1a b8 09 20 dd | f2 6c 74 0d 1a c2 1c 20 |--.... .|.lt.... |
|00005ea0| f2 66 69 6e 64 6e 75 6d | 62 65 72 3a e7 20 61 62 |.findnum|ber:. ab|
|00005eb0| 6f 72 74 3d 31 20 e1 0d | 1a cc 13 20 61 6e 67 6c |ort=1 ..|... angl|
|00005ec0| 65 3d 61 6e 67 6c 65 2b | 4e 6f 0d 1a e0 2d 20 f5 |e=angle+|No...- .|
|00005ed0| 3a e7 20 61 6e 67 6c 65 | 3e 33 35 39 2e 39 39 39 |:. angle|>359.999|
|00005ee0| 39 39 39 39 39 39 39 20 | 61 6e 67 6c 65 3d 61 6e |9999999 |angle=an|
|00005ef0| 67 6c 65 2d 33 36 30 0d | 1a ea 1c 20 fd 20 61 6e |gle-360.|... . an|
|00005f00| 67 6c 65 3c 3d 33 35 39 | 2e 39 39 39 39 39 39 39 |gle<=359|.9999999|
|00005f10| 39 39 39 0d 1a fe 20 20 | f5 3a e7 20 61 6e 67 6c |999... |.:. angl|
|00005f20| 65 3c 30 20 61 6e 67 6c | 65 3d 61 6e 67 6c 65 2b |e<0 angl|e=angle+|
|00005f30| 33 36 30 0d 1b 08 0f 20 | fd 20 61 6e 67 6c 65 3e |360.... |. angle>|
|00005f40| 3d 30 0d 1b 12 06 20 e1 | 0d 1b 1c 10 20 f4 2d 2d |=0.... .|.... .--|
|00005f50| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 1b 26 11 20 dd f2 73 |--------|..&. ..s|
|00005f60| 65 74 68 65 61 64 69 6e | 67 0d 1b 30 1c 20 f2 66 |etheadin|g..0. .f|
|00005f70| 69 6e 64 6e 75 6d 62 65 | 72 3a e7 20 61 62 6f 72 |indnumbe|r:. abor|
|00005f80| 74 3d 31 20 e1 0d 1b 3a | 2d 20 61 6e 67 6c 65 3d |t=1 ...:|- angle=|
|00005f90| 34 35 30 2d 4e 6f 3a e7 | 20 61 6e 67 6c 65 3e 33 |450-No:.| angle>3|
|00005fa0| 35 39 20 61 6e 67 6c 65 | 3d 61 6e 67 6c 65 2d 33 |59 angle|=angle-3|
|00005fb0| 36 30 0d 1b 44 06 20 e1 | 0d 1b 4e 10 20 f4 2d 2d |60..D. .|..N. .--|
|00005fc0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 1b 58 11 20 dd f2 6d |--------|..X. ..m|
|00005fd0| 6f 74 69 6f 6e 28 61 6c | 29 0d 1b 62 1c 20 f2 66 |otion(al|)..b. .f|
|00005fe0| 69 6e 64 6e 75 6d 62 65 | 72 3a e7 20 61 62 6f 72 |indnumbe|r:. abor|
|00005ff0| 74 3d 31 20 e1 0d 1b 6c | 1e 20 78 66 3d 74 78 70 |t=1 ...l|. xf=txp|
|00006000| 6f 73 2d 35 30 30 3a 79 | 66 3d 74 79 70 6f 73 2d |os-500:y|f=typos-|
|00006010| 33 32 32 0d 1b 76 44 20 | 71 32 78 3d 35 30 30 2d |322..vD |q2x=500-|
|00006020| 78 66 3a 71 32 79 3d 74 | 79 70 6f 73 3a 71 33 78 |xf:q2y=t|ypos:q3x|
|00006030| 3d 35 30 30 2d 78 66 3a | 71 33 79 3d 33 32 32 2d |=500-xf:|q3y=322-|
|00006040| 79 66 3a 71 34 78 3d 74 | 78 70 6f 73 3a 71 34 79 |yf:q4x=t|xpos:q4y|
|00006050| 3d 33 32 32 2d 79 66 0d | 1b 80 29 20 c8 99 22 57 |=322-yf.|..) .."W|
|00006060| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 63 |imp_SetC|olour",c|
|00006070| 6f 6c 6f 75 72 3a e6 20 | 30 2c 63 6f 6c 6f 75 72 |olour:. |0,colour|
|00006080| 0d 1b 8a 20 20 e7 20 61 | 6e 67 6c 65 3e 33 35 39 |... . a|ngle>359|
|00006090| 20 61 6e 67 6c 65 3d 61 | 6e 67 6c 65 2d 33 36 30 | angle=a|ngle-360|
|000060a0| 0d 1b 94 35 20 e7 20 61 | 6c 3d 31 20 41 41 31 3d |...5 . a|l=1 AA1=|
|000060b0| 9b 28 28 61 6e 67 6c 65 | 29 2a af 2f 31 38 30 29 |.((angle|)*./180)|
|000060c0| 3a 42 42 31 3d b5 28 28 | 61 6e 67 6c 65 29 2a af |:BB1=.((|angle)*.|
|000060d0| 2f 31 38 30 29 0d 1b 9e | 3e 20 e7 20 61 6c 3d 2d |/180)...|> . al=-|
|000060e0| 31 20 41 41 31 3d 9b 28 | 28 61 6e 67 6c 65 2b 31 |1 AA1=.(|(angle+1|
|000060f0| 38 30 29 2a af 2f 31 38 | 30 29 3a 42 42 31 3d b5 |80)*./18|0):BB1=.|
|00006100| 28 28 61 6e 67 6c 65 2b | 31 38 30 29 2a af 2f 31 |((angle+|180)*./1|
|00006110| 38 30 29 0d 1b a8 27 20 | e7 20 41 41 31 3e 2d 30 |80)...' |. AA1>-0|
|00006120| 2e 30 30 30 30 31 20 80 | 20 41 41 31 3c 30 2e 30 |.00001 .| AA1<0.0|
|00006130| 30 30 30 31 20 41 41 31 | 3d 30 0d 1b b2 27 20 e7 |0001 AA1|=0...' .|
|00006140| 20 42 42 31 3e 2d 30 2e | 30 30 30 30 31 20 80 20 | BB1>-0.|00001 . |
|00006150| 42 42 31 3c 30 2e 30 30 | 30 30 31 20 42 42 31 3d |BB1<0.00|001 BB1=|
|00006160| 30 0d 1b bc 18 20 41 41 | 3d 4e 6f 2a 41 41 31 3a |0.... AA|=No*AA1:|
|00006170| 42 42 3d 4e 6f 2a 42 42 | 31 0d 1b c6 1a 20 41 3d |BB=No*BB|1.... A=|
|00006180| 41 41 2b 74 78 70 6f 73 | 3a 42 3d 42 42 2b 74 79 |AA+txpos|:B=BB+ty|
|00006190| 70 6f 73 0d 1b d0 04 0d | 1b da 3a 20 c8 99 22 4f |pos.....|..: .."O|
|000061a0| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 33 31 36 2c |S_Sprite|Op",316,|
|000061b0| 67 72 61 62 5f 6d 65 6d | 73 74 61 72 74 2c 22 61 |grab_mem|start,"a|
|000061c0| 72 65 61 22 2c 30 3a e6 | 20 30 2c 63 6f 6c 6f 75 |rea",0:.| 0,colou|
|000061d0| 72 0d 1b e4 14 20 e7 20 | 70 65 6e 5f 74 68 69 63 |r.... . |pen_thic|
|000061e0| 6b 3d 31 20 8c 0d 1b ee | 2f 20 20 e7 20 70 65 6e |k=1 ....|/ . pen|
|000061f0| 24 3d 22 64 6f 77 6e 22 | 20 ec 20 74 78 70 6f 73 |$="down"| . txpos|
|00006200| 2c 74 79 70 6f 73 3a df | 20 41 2c 42 20 8b 20 ec |,typos:.| A,B . .|
|00006210| 20 41 2c 42 0d 1b f8 22 | 20 20 20 e7 20 73 79 6d | A,B..."| . sym|
|00006220| 6d 5f 6f 6e 3d 31 20 80 | 20 70 65 6e 24 3d 22 64 |m_on=1 .| pen$="d|
|00006230| 6f 77 6e 22 20 8c 0d 1c | 02 1b 20 20 20 20 78 66 |own" ...|.. xf|
|00006240| 32 3d 41 2d 35 30 30 3a | 79 66 32 3d 42 2d 33 32 |2=A-500:|yf2=B-32|
|00006250| 32 0d 1c 0c 49 20 20 20 | 20 71 32 78 32 3d 35 30 |2...I | q2x2=50|
|00006260| 30 2d 78 66 32 3a 71 32 | 79 32 3d 42 3a 71 33 78 |0-xf2:q2|y2=B:q3x|
|00006270| 32 3d 35 30 30 2d 78 66 | 32 3a 71 33 79 32 3d 33 |2=500-xf|2:q3y2=3|
|00006280| 32 32 2d 79 66 32 3a 71 | 34 78 32 3d 41 3a 71 34 |22-yf2:q|4x2=A:q4|
|00006290| 79 32 3d 33 32 32 2d 79 | 66 32 0d 1c 16 33 20 20 |y2=322-y|f2...3 |
|000062a0| 20 20 ec 20 71 32 78 2c | 71 32 79 3a df 20 71 32 | . q2x,|q2y:. q2|
|000062b0| 78 32 2c 71 32 79 32 3a | ec 20 71 33 78 2c 71 33 |x2,q2y2:|. q3x,q3|
|000062c0| 79 3a df 20 71 33 78 32 | 2c 71 33 79 32 0d 1c 20 |y:. q3x2|,q3y2.. |
|000062d0| 23 20 20 20 20 ec 20 71 | 34 78 2c 71 34 79 3a df |# . q|4x,q4y:.|
|000062e0| 20 71 34 78 32 2c 71 34 | 79 32 3a ec 20 41 2c 42 | q4x2,q4|y2:. A,B|
|000062f0| 0d 1c 2a 08 20 20 20 cd | 0d 1c 34 14 20 74 78 70 |..*. .|..4. txp|
|00006300| 6f 73 3d 41 3a 74 79 70 | 6f 73 3d 42 0d 1c 3e 06 |os=A:typ|os=B..>.|
|00006310| 20 cd 0d 1c 48 04 0d 1c | 52 3a 20 e7 20 70 65 6e | ...H...|R: . pen|
|00006320| 5f 74 68 69 63 6b 3d 31 | 20 c8 99 22 4f 53 5f 53 |_thick=1| .."OS_S|
|00006330| 70 72 69 74 65 4f 70 22 | 2c 33 31 36 2c 67 72 61 |priteOp"|,316,gra|
|00006340| 62 5f 6d 65 6d 73 74 61 | 72 74 2c 30 2c 31 3a e1 |b_memsta|rt,0,1:.|
|00006350| 0d 1c 66 14 20 e7 20 70 | 65 6e 24 3d 22 64 6f 77 |..f. . p|en$="dow|
|00006360| 6e 22 20 8c 0d 1c 70 33 | 20 20 50 58 31 3d 74 78 |n" ...p3| PX1=tx|
|00006370| 70 6f 73 2b 28 28 70 65 | 6e 5f 74 68 69 63 6b 2f |pos+((pe|n_thick/|
|00006380| 32 29 2a 9b 28 28 61 6e | 67 6c 65 2b 39 30 29 2a |2)*.((an|gle+90)*|
|00006390| af 2f 31 38 30 29 29 0d | 1c 7a 33 20 20 50 59 31 |./180)).|.z3 PY1|
|000063a0| 3d 74 79 70 6f 73 2b 28 | 28 70 65 6e 5f 74 68 69 |=typos+(|(pen_thi|
|000063b0| 63 6b 2f 32 29 2a b5 28 | 28 61 6e 67 6c 65 2b 39 |ck/2)*.(|(angle+9|
|000063c0| 30 29 2a af 2f 31 38 30 | 29 29 0d 1c 84 34 20 20 |0)*./180|))...4 |
|000063d0| 50 58 32 3d 74 78 70 6f | 73 2b 28 28 70 65 6e 5f |PX2=txpo|s+((pen_|
|000063e0| 74 68 69 63 6b 2f 32 29 | 2a 9b 28 28 61 6e 67 6c |thick/2)|*.((angl|
|000063f0| 65 2b 32 37 30 29 2a af | 2f 31 38 30 29 29 0d 1c |e+270)*.|/180))..|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
